title image


Smiley Re: E2000: Zelle finden, in der ein Wert steht
Hallo,



hier ein VBA-Code Teil den du entsprechend abändern kannst.









With Worksheets(tmpSh).Range("A:X")

            Set wk = .Find("WK", LookIn:=xlValues)

            If wk Is Nothing Then GoTo 999

    End With



    wkAdr = wk.Address







Code eingefügt mit Syntaxhighlighter 4.0




Neandr	            //gW
Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.1.11) Gecko/20071127 Firefox/2.0.0.11 - Build ID: 2007112718; 
TB version  2.0.0.9 (20071031)
jre6.0.04; MS Office 10 
Intel Pro/W LAN 2100 3B Mini PCI with WAP; 1&1 DSL mit Fritz!Box 7050/7150



geschrieben von


Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: