Ein Name per VBA in zwei verschieZellen
04.12.2021 14:11:49
Robert
Ich habe mal wieder ein Problem bzw. den Wunsch der Erweiterung. Dabei bräuchte ich Eure Hilfe. Folgenmdes Makro ändert Tabellennamen ohne Problem
Sub Umbeneneinzeln()
Dim strDatei As String, strTabelle As String, strRange As String
strDatei = Range("A26")
strTabelle = Range("A27")
strRange = Range("A28")
Range(strRange).Select
ActiveSheet.ListObjects.Add(xlSrcRange, Range(strRange), , xlYes).Name = _
strTabelle
Range(strRange)(1) = strTabelle
End Sub
Für Eure Mühe danke ich im voraus.
https://www.herber.de/bbs/user/149578.xlsm
LG Robert
