• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

tijden opzoeken met VBA

Status
Niet open voor verdere reacties.

chermans74

Gebruiker
Lid geworden
12 jul 2012
Berichten
32
Hallo,

De volgende vraag. Ik heb twee werkbladen waarin tijden staan (format h:mm). Nu wil ik met een tijd uit werkblad 1 dezelfde tijd opzoeken in werkblad 2.
Hiervoor gebruik ik de volgende macro;
Code:
-dim tijd as date
-Sheets("Sheet1").activate
-tijd = selection
-Sheets("Sheet2").activate
-Cells.Find(What:=tijd).Activate

Dit resulteert in een foutmelding (Object variable or with block variable not set).
Wat gaat hier mis. Als ik naarde de twee tijden kijk zijn ze exact hetzelfde.

Alvast bedankt,
C. hermans.
 
Laatst bewerkt door een moderator:
Code:
Dim tijd As Date, c As Range
Sheets("Sheet1").Activate
 tijd = ActiveCell
  Set c = Sheets("Sheet2").Cells.SpecialCells(2).Find(tijd, , xlFormulas, xlWhole)
    If Not c Is Nothing Then
   Application.Goto Sheets("Sheet2").Range(c.Address)
  End If
 
Beste Harry,

Zelf had ik al iets gevonden om het te laten werken, vandaar de status opgelost. (ik had ook geen reactie meer verwacht)

Echter jouw code werkt veel beter dus die ga ik gebruiken.

Heel veel dank.

Groet,
C hermans.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan