Ga naar inhoud

Ypsolona

Lid
  • Items

    43
  • Registratiedatum

  • Laatst bezocht

Alles dat geplaatst werd door Ypsolona

  1. Dank bucky voor uw antwoord. Hierbij een model van het ontwerp. Groetjes Sub Opzoeken() Dim myKolom As String Dim myRange As String Dim Verder As VbMsgBoxResult ' myRange = ("A1") myEindpunt = ("A50") myKolom = ("A:A") Verder = vbYes myValue = InputBox("Wat zoek zoek je ?", "Opzoeken van een waarde") ' Do While Verder = vbYes Set FoundCell = ActiveSheet.Range(myRange, myEindpunt).Find(myValue) ' If FoundCell Is Nothing Then MsgBox "De waarde -> " & myValue & " <- is niet gevonden " Exit Sub Else Range(FoundCell.Address).Select ' If (FoundCell.Address) = myRange Then MsgBox "Geen verder waarden gevonden!""" Exit Sub End If ' myRange = (FoundCell.Address) Verder = MsgBox("Verder zoeken?", vbYesNo) ' If Verder = vbNo Then Exit Sub End If ' End If Loop End Sub
  2. Ik heb bovenstaande oplossing aangepast om achtereenvolgend alle gelijke waarden te vinden.Dit werkt perfect voor tekst,maar ik zou het nu echter ook graag gebuiken om getallen te vinden. Dit werkt echter niet juist; er wordt geen onderscheid gemaakt tussen negatieven en positieve getallen, en bovendien wordt niet gezocht naar de juiste waarde. Zoeken naar bijvoorbeeld 2, komt terecht bij 0,27; 0.12; 2; 2.6 ...kortom bij elke cel die een 2 bevat. is er een methode om alleen de juiste waarde te vinden en niets anders? Bedankt voor jullie hulp.
  3. Hallo bucky Heel snelle service, dank u wel. Met wat kleine aanpassing werkt het perfect! Opgelost dus. Groetjes
  4. (Gebruikt : Windows 7 en Office 2010) Hallo, wie kan mij helpen? In een excel datatbase heb ik met 'aangepast sorteren' per kolom een macro gemaakt die sorteert van klein naar groot. De kolom bevat zowel waarden als tekst. Er zijn soms veel gelijke waarden en teksten zodat die netjes verzameld worden in reeksen, die dan mooi elkaar volgens hun waarde opvolgen. Dit werkt perfect. Mijn vraag nu: Om het lang en diep naar beneden scrollen te vermijden zou ik graag, aanvullend aan voorgaande, vlug willen zien als een waarde of tekst in die kolom staat, en zo ja de eerste cel van die reeks bereiken. De gewenste waarde zou ik willen invoeren via een invulvakje. Kan dit met de 'vind' methode, en hoe doe ik dit dan?? Eeuwige dank...
  5. Hallo Clarkie Kan het een kader uit mijn voorbeeld hierboven zijn die je bedoelt met de 'tijdelijke kader rond een woord' bij aanwijs met de muis?
  6. Voorbeeld van wat ik bedoel. (Klik op de afbeelding om te vergroten)
  7. Hallo, wie kan mij helpen? Gebruikt:Windows 7 - Office 2010 Ik zoek een (download)programma(tje) om met de muis een tijdelijke aanwijskader met passende afmeting te tonen rond een woord, figuur, zin... tijdens het toelichten van een PP (of word, of excel..) demonstratie op het scherm.Ik ken het gebruik van de stift, of "fluopunt", maar zou liever het onderwerp kunnen benadrukken met een rechthoekig kadertje. Alvast bedank!
  8. Hallo, wie kan mij helpen? Gebruikt:Windows 7 - Office 2010 Ik zoek een programma(tje) om met de muis een tijdelijke kader met passende afmeting te plaatsen rond een woord, figuur, zin... tijdens het toelichten van een PP (of word, of excel..) demonstratie op het scherm. Ik ken het gebruik van de stift, of "fluopunt", maar zou graag het onderwerp kunnen omkaderen. Alvast bedank!
  9. Oef, wat een geluk...de operatie is geslaagd, een hele opluchting. Dank voor alle deskundige hulp. Ik ga met genoegen reageren met 'OPGELOST'
  10. Sorry, nu ben ik even ontspoord. Ik ben geen expert, wat moet er gebeuren nu? waar vindt ik welke driver,, ik krijg een ganse lijst op ADM..help! ---------- Post toegevoegd om 11:53 ---------- Vorige post was om 11:48 ---------- (Ik bedoel AMD ipv ADM)
  11. Hallo dasle, Dit zijn de waarden: Pci\ven_1002&dev_791f&subsys_c1081631&rev_00 pci\ven_1002&dev_791f&subsys_c1081631 pci\ven_1002&dev_791f&cc_030000 pci\ven_1002&dev_791f&cc_0300 ---------- Post toegevoegd om 18:46 ---------- Vorige post was om 18:44 ---------- Hello Dasle, Dit zijn de waarden: PCI\VEN_1002&DEV_791F&SUBSYS_C1081631&REV_00 PCI\VEN_1002&DEV_791F&SUBSYS_C1081631 PCI\VEN_1002&DEV_791F&CC_030000 PCI\VEN_1002&DEV_791F&CC_0300
  12. Dank Asus. Blijkbaar wordt het hopeloos, ook ADM Driver Autodetect adviseert geen enkele valabele driver...
  13. Hallo, mag ik nog even terugkomen op mijn probleem, weet er niemand raad?. In de hoop....Alvast dank
  14. Dank voor uw spoedige reactie. Hierbij de gevraagde link. http://speccy.piriform.com/results/Nwhdjzym1vB2x6rf5eXkdDL
  15. Model is ALP-ajax A - Bouwdatum:19/2/2009 SNID 90800012665
  16. Hallo, ik heb mijn laptop PackardBell - EasyNote wegens problemen met Vista (na 2 jaar goede dienst) geüpdate naar Windows7.Dit lijkt geslaagd,maar de resolutie krijg ik niet juist. Ik heb enkel de keuze tussen 1024x768 en 800x600. De letters en cijfers zijn niet scherp, en een cirkel is uitgerokken in de breedte. Bij Windows7-support wordt ik doorverwezen naar PackardBell, en bij PackardBell-support krijg ik alleen het antwoord dat ik maar bij Vista moest gebleven zijn, en op hun downloadsite vindt ik ook geen gepaste driver. Kan iemand mij helpen? Dank
  17. Dank;werkt eindelijk perfect (met kleine aanpassing: =SOMPRODUCT((MAAND(A2:A18)=1..........)
  18. Gegeven: Maanden in kolom A; Codes in kolom C; Bedragen in kolom D Probleem: Ik wil de som maken (in bvb E1) van de bedragen in het bereik (D2:18) van de maand januari(A2:A18) als de code 1 is(C2:C18)Volgende formule werkt niet;hoe moet het wel? ={SOM(ALS(EN(MAAND($A$2:$A$18)=1;$C$2:$C$18=1);$D$2:$D$18))}
×
×
  • Nieuwe aanmaken...

Belangrijke informatie

We hebben cookies geplaatst op je toestel om deze website voor jou beter te kunnen maken. Je kunt de cookie instellingen aanpassen, anders gaan we er van uit dat het goed is om verder te gaan.