Pozdravljeni,
V Excelu želim najti stolpec, kjer je neko besedilo (npr. imena).
To sem rešil tako:
Set c = Range("A1:AX3").Find(ime)
stolpecIme=c.Column
Imam pa težavo, ko ni celice z besedilom "ime".
Poskusil sem različne variante (ena je navedena spodaj), vendar mi ne uspe.
If c = False Then
MsgBox "Napačna datoteka! Poskusi ponovno.", vbCritical
End If
Prosim torej za pomoč.
Najlepša hvala!
Funkcija FIND
Re: Funkcija FIND
Pozdravljeni,
če besedila Excel ne najde, postavi vrednost spremenljivke c na nično vrednost; torej Nothing. Zatorej je programska koda sledeča:
če besedila Excel ne najde, postavi vrednost spremenljivke c na nično vrednost; torej Nothing. Zatorej je programska koda sledeča:
Koda: Izberi vse
If (c Is Nothing) Then
MsgBox "Napačna datoteka! Poskusi ponovno.", vbCritical
Else
stolpecime = c.Column
End If
lp,
Matjaž Prtenjak
Administrator
Matjaž Prtenjak
Administrator
Re: Funkcija FIND
Še enkrat se vam zahvaljujem za odgovor.