Hallo,
ich hab da ein Problem! Ich habe einen Quelltext:
Sheets("zusammen").Select
Cells.Find(What:="\\server\Network Interface(Broadcom NetXtreme Gigabit Ethernet)\Bytes Sent/sec", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
ActiveCell.FormulaR1C1 = "Bytes Sent/sec"
Range(ActiveCell, ActiveCell.Offset(rowoffset:=0, columnoffset:=1)).Copy
Sheets("Tabelle4").Select
Range("a19").Select
ActiveSheet.Paste
hier soll ein feld mit einem bestimmten inhalt gesucht werden. wenn dieses feld gefunden wird, soll er es umbennenen und in eine andere tabelle kopieren.
Mein Problem:
ich habe nicht immer die selben namen, wenn er also einen namen nicht findet, dann soll er trotzdem weiter machen und nicht einfach stehen bleiben und einen fehler melden.. so wie er es jetzt tut. Meine Idee war es einen If befehl einzupflegen. Aber das funktionierte nicht. Ich denke mal die stelle wo ich es hatte war eine falsche stelle. Kann mir jemand helfen?
Danke! Gruß
Julia