*

Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Pagina's: [1]   Omlaag

Auteur Topic: zoekcriteria niet gevonden  (gelezen 1811 keer)

0 leden en 1 gast bekijken dit topic.

Offline Justaguy

  • Lid
  • *
  • Berichten: 86
  • Wie zoekt, die vindt ... het in Oplossing.be
zoekcriteria niet gevonden
« Gepost op: 22 april 2005, 20:06:41 »
Veronderstel in een rij een range met waarden.
Daarop zou een zoekactie naar een bepaalde waarde moeten gebeuren en naargelang de gezochte waarde gevonden is of niet een verdere actie moeten gebeuren.
dus ja gevonden dan naar actie 1, zo nee dan naar actie 2.
Gelogd
SYSTEEM: AMD Athlon 1Ghz - 256Mb RAM - Win XP - Office2003 – kabel)

Offline LucHeyndrick

  • Volledig lid
  • **
  • Berichten: 217
  • Oplossing.be
Re:zoekcriteria niet gevonden
« Reactie #1 Gepost op: 22 april 2005, 21:04:42 »
Hallo Justaguy,

zoiets misschien?

Sub ZoekIets()
    Dim rng As Range
    Set rng = Range("1:1").Find(what:=InputBox("Watte?"), Lookat:=xlWhole)
    If rng Is Nothing Then
        MsgBox "Niet gevonden"
    Else
        MsgBox "Gevonden"
    End If
End Sub

Luc
Gelogd
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline Justaguy

  • Lid
  • *
  • Berichten: 86
  • Wie zoekt, die vindt ... het in Oplossing.be
Re:zoekcriteria niet gevonden
« Reactie #2 Gepost op: 22 april 2005, 21:35:33 »
Perfect, Luc.
Gelogd
SYSTEEM: AMD Athlon 1Ghz - 256Mb RAM - Win XP - Office2003 – kabel)
Pagina's: [1]   Omhoog
 


www.combell.com