RE: nenajdena bunka v exceli

• Previous message: h! y n e k . l i p a: "Re: pc sestava"
• Maybe in reply to: Milan Kevely: "nenajdena bunka v exceli"
• Next in thread: schimi: "Re: nenajdena bunka v exceli"
• Reply: schimi: "Re: nenajdena bunka v exceli"
• Messages sorted by: [ date ] [ thread ] [ subject ] [ author ] [ attachment ]

Zdar a silu Milan, dna 21.06.2002 si napisal(a):

> Mam v makre nieco taketo:
>     Rows("1:1").Select
>     Selection.Find("XYZ", After:=ActiveCell).Activate
> 
> Bunka s touto hodnotou moze byt vzdy v inom stlpci...
> Neviem urobit ak bunka s touto hodnotou v prvom riadku
> nie je, elegantny skok niekam inam...
> Nechcem aby to koncilo chybovou hlaskou makra.
> 
> Nieco ako:
> if not exist ... "XYZ hocikde v riadku" GoTo NIEKAM
> 
> Ako to urobit?

Set foundcell =  _
Workbooks("subor.xls").Worksheets("Sheets1").Columns("A:A").Find("hladane")
    If foundcell Is Nothing Then
	zrob co chces
   else
           foundcell.activate
	'ak potrebujes len jej hodnotu tak ju nemusis activovat .... 
   end if

s pozdravom
AleXXX
-- 

Gara cecageyxe pumymap itasi mex ikuv-riy, 
feaj wiwoudi meuu ilukahe-yaluony etica oxi.

• Previous message: h! y n e k . l i p a: "Re: pc sestava"
• Maybe in reply to: Milan Kevely: "nenajdena bunka v exceli"
• Next in thread: schimi: "Re: nenajdena bunka v exceli"
• Reply: schimi: "Re: nenajdena bunka v exceli"
• Messages sorted by: [ date ] [ thread ] [ subject ] [ author ] [ attachment ]

This archive was generated by hypermail 2.1.2 : 21. 06. 2002, 10:22 CEST