Excel und VB

[moses_rotesmeer]

hallo,

Ich beschreibe aus VB eine Excel Vorlage mit dem Befehl:

xlApp.Range("Zellenname").Value = "wert"

das Problem das bei mir Auftreten kann ist dass die Zelle, die in diesem Beispiel "Zellenname" heisst, nicht vorhanden ist.
Logischerweise kann VB nicht in ein Feld schreiben, welches nicht da ist

Jetzt muss ich irgendwie abfangen ob die Zelle Namens "Zellenname" vorhanden ist oder nicht und je nach dem kann ich dann ja die Zelle befüllen oder nicht.
*****
Also wie kann ich aus VB abfragen ob eine Zelle aus meiner Excel Tabelle mit beliebigen Namen existiert oder nicht?

[moses_rotesmeer]

hab das problem jetzt einfach umgangen (unterdrücke die meldung)

[flinx]

Versuchs mit:

Sub test()
Set nms = ActiveWorkbook.Names
Set wks = Worksheets(1)
For r = 1 To nms.Count
    If nms(r).Name = "Zellenname" Then MsgBox "existiert"
Next
End Sub

[Hussl]

@moses_rotesmeer

ich glaub du hast es eh auch so gemacht. ich würde den fehler abfangen.

Bevor du etwas in die Zelle schreibst:

On Error Resume Next

und nach dem Versuch in die Zelle zu schreiben

If Err.Number <> 0 Then
   MsgBox "Kann nicht in die Zelle schreiben."
End If

Du kannst auch schauen, welchen Fehlercode du bekommst, wenn du in eine nicht vorhandene Zelle schreibst und diesen dann abfragst. So schließt du aus, dass du auch andere Fehler ignorierst...