-----Original Message-----
From: Likavcan, Alexander [mailto:Alexander.Likavcan@volkswagen.sk]
Sent: Monday, January 27, 2003 12:30 PM
To: 'servis-internet@nawebu.cz'
Subject: RE: Excel - VBA - Cells.Find
> bude ti to stacit takto???
> Set foundcell =
> Workbooks("subor.xls").Worksheets(mySheet).Columns("A:A").Find(mykey)
> If foundcell Is Nothing Then
> bunka.AddComment ("nicht gefunden")
>
> alebo pred vyhladavanie daj:
> on error resume next
> a za vyhladanie toto:
> if err.number >0 then
> niekam napis nulu
> err.clear
> end if
> s pozdravom
> AleXXX
Jo myslim, ze to staci. Diky moc.
Pred chvili jsem neco zplodil sam - pomalu si zase vzpominam :-))
KaCe
--cecil@volny.cz
This archive was generated by hypermail 2.1.2 : 27. 01. 2003, 14:04 CET