Hallo EXCEL-Freunde,
für eine Formel mit VBA-Code habe ich bereits eine Lösung, die noch dadurch verbessert
werden soll, dass durch Verwendung von Namen die richtige Spalte erhalten bleibt,
auch wenn Spalten eingefügt werden. Im nachstehenden Beispiel habe ich die Spalte F
als "Mitarbeiter" bezeichnet; leider erhalte ich aber bei Verwendung des Codes
immer unterschiedliche Fehlermeldungen, wie beschrieben:
Sub testen3()
Dim Mitarbeiter As Variant 'Object 'Integer 'String
Sheets("Grunddaten").Select
'''#### Spalte 6 = Name: Mitarbeiter
'? Fehlermeldung: Laufzeitfehler 13 oder 1004 ?
Cells(6, 18).Formula = _
"=" & Cells(6, Mitarbeiter).Address(0, 0) & "&" & Cells(6, 1).Address(0, 0)
''''##### funktioniert:
Cells(7, 18).Formula = _
"=" & Cells(7, 6).Address(0, 0) & "&" & Cells(7, 1).Address(0, 0)
Range("A1").Select
End Sub

Besten Dank für eine Hilfe!
mfg
Erich
EXCEL-Shareware und Freeware: http://www.toolex.de
EXCEL und Lottogewinne machen glücklich: http://48678.rapidforum.com