Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Ein Name per VBA in zwei verschieZellen

Forumthread: Ein Name per VBA in zwei verschieZellen

Ein Name per VBA in zwei verschieZellen
04.12.2021 14:11:49
Robert
Hallo liebe Exelfreunde!
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
Nun würde ich gerne den Namen aus A27 gleichzeitig in eine zweite Zelle kopieren per VBA. Ich habe eine Beispieldatei mit angehängt. Das Makro ist auch schon mit Eurer Hilfe entstanden. Gibt es dafür eine Möglichkeit.
Für Eure Mühe danke ich im voraus.
https://www.herber.de/bbs/user/149578.xlsm
LG Robert
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ein Name per VBA in zwei verschieZellen
04.12.2021 14:18:40
Hajo_Zi
Hallo Robert,
Range(strRange)(1) = strTabelle
Range("A27").Copy Range("As123)
GrußformelHomepage
In diesem Forum bekomme nur selten eine Mailbenachrichtigung, weitere Antworten sind zufällig.
Anzeige
AW: Ein Name per VBA in zwei verschieZellen
04.12.2021 14:25:37
Rudi
Hallo,

Sub Umbeneneinzeln()
Dim strDatei As String, strTabelle As String, strRange As String
strDatei = Range("A26")
strTabelle = Range("A27")
strRange = Range("A28")
ActiveSheet.ListObjects.Add(xlSrcRange, Range(strRange), , xlYes).Name = _
strTabelle
With Range(strRange)
.Cells(1) = strTabelle
.Cells(.Cells.Count).Offset(3) = strTabelle
End With
End Sub
Gruß
Rudi
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige