Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1656to1660
1656to1660
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ActiveWorkbook.Names ersetzen

Forumthread: ActiveWorkbook.Names ersetzen

ActiveWorkbook.Names ersetzen
15.11.2018 09:45:31
petero
Hallo,
ich habe in einer Tabelle diverse Bereiche mit Namen versehen. Hier muss nun eine Änderung vorgenommen werden. Beispiel:
AB_XYZ wird zu CDE_XYZ
AB_ACB wird zu CDE_ACB
Es sind die ersten zwei Buchstaben (immer AB!) durch drei andere (immer CDE!) zu ersetzen.
Die alten Namen (AB_...) sind anschließend zu löschen.
Gibt es dafür eine Lösung per VBA? Händisch ist das nämlich aufgrund der Vielzahl sehr mühsam und der Macrorekorder bringt mich da nicht weiter.
Gruß Peter
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: ActiveWorkbook.Names ersetzen
15.11.2018 09:58:31
EtoPHG
Hallo Peter,
Probier mal (in ein Modul): 
Sub NamenUmbennen()
Dim ns As Name
For Each ns In ActiveWorkbook.Names
If Left(ns.Name, 3) = "AB_" Then
ns.Name = Replace(ns.Name, "AB_", "CDE_")
If Left(ns.Name, 3) = "AB_" Then ns.Delete
End If
Next ns
End Sub
Gruess Hansueli
Anzeige
Danke, es kann so einfach sein - kwT
15.11.2018 10:31:42
petero
.
;

Forumthreads zu verwandten Themen

Fehlermeldung bei "ActiveWorkbook.Names.Add "
k

Hallo, nur mal eben eine kurze Frage:
Habe eine Userform die beim Start einen Bereich mit einem Namen versehen soll (Dynamisch).
Ist der Name schon vorhanden - klappt alles super - wenn nicht erhalte ich immer an dieser Stelle eine Fehlermeldung ! "Angegebene Formel enthält ei...
11.08.2009 11:29:47
Thread-ID: 1094955
5 Beiträge
ActiveWorkbook.ThemeColorSchem Name auslesen
Sonnenpeter

Hallo,
ich versuche gerade (erfolglos) den Namen des aktuellen Colorschemas
auszulesen.
Sub Test() tester = ActiveWorkbook.ThemeColorScheme.Name 'tester = ActiveWorkbook.Theme End Sub Ist der Name des aktuellen Colorschemas überhaupt auslesbar?
Wenn ja wie? ;-)
Gruß SP
17.10.2009 16:10:12
Thread-ID: 1110320
4 Beiträge
ActiveWorkbook.Names.Add - nicht ausgew. Sheet
Peter

Guten Tag
Mit nachfolgender Codezeile definiere ich in im Sheet "Tabellenliste" den Bereich "XTabellen".
Leider funktioniert das jedoch nur, wenn die Tabelle "Tabellenliste" auch ausgewählt ist. Wie muss ich den Code anpassen, dass die Bereichsdefinition klappt, wenn eine andere Tabelle...
23.11.2010 11:53:02
Thread-ID: 1188279
3 Beiträge
If ActiveWorkbook.Name <> ThisWorkbook.Name Then E
Heinz

Hallo Leute
Hatte im Jänner im Forum angefragt.
Habe einen Schichtplan mit vielen Makros, und Protect mit Passort.
Wenn ich in der Firma den Schichtplan öffne UND eine andere Exceltabelle öffne,das dort auch der Blattschutz reinkommt.
Warum ?
Nun hatte ich einen Lösungsvorsc...
10.03.2011 12:48:10
Thread-ID: 1205143
6 Beiträge
Anzeige
ActiveWorkbook.SaveAs Filename
Sandra

Hallo zusammen,
ich habe mal wieder ein Problem.
Mit dem nachfolgenden Code lasse ich automatisch speichern.
Dim Dateiname As String
Dateiname = oXlSM.Name
ActiveWorkbook.SaveAs Filename:="\\xxxx\Dokumentation\" & Dateiname & ".xml"
Das klappt auch fast. Allerdin...
21.06.2011 16:49:35
Thread-ID: 1219171
3 Beiträge
ThisWorkbook.Activate
Maximilian

Warum wird bei ThisWorkbook.Activate immer auch das erste Worksheet meiner Mappe ausgewählt?
Meiner Erinnerung nach war das vor ein paar Tagen noch nicht der Fall oder täusche ich mich? Ist das bei euch so?
27.02.2013 11:49:04
Thread-ID: 1301264
3 Beiträge
ActiveWorkbook.SaveAs Dateiname aus Strings
Ben

Hallo,
ich habe folgendes VBA Programm als Makro geschrieben:
Dim pfad As String
ActiveSheet.Unprotect
Dim kursbezeichnung As String
kursbezeichnung = range("F2").Value
Application.DisplayAlerts = False
pfad = "C:\1\" & kursbezeichnung & "\Moodlezugangsdaten....
31.03.2015 14:50:36
Thread-ID: 1418235
4 Beiträge
Anzeige
VBA: Neues Workbook erstellen
Dieter(Drummer)

Hi Spezialisten,
bei Start von Excel ist KEINE neue Datei da. Ich suche die VA Lösung, dass ich mit Workbook.open, in der Datei PersonL.xlsb (ist ausgeblendet), beim öffnen von Excel eine Datei da ist. Mit Workbook.add geht es nicht, da ja keine Datei, beim Start von Excel, geöffnet ist.
15.10.2015 13:23:28
Thread-ID: 1452482
4 Beiträge
Syntax: ActiveWorkbook.SaveAs Dateiname, True?
Andreas Z

Guten Morgen,kann mir jemand sagen was ich an der Syntax "ActiveWorkbook.SaveAs Dateiname, True"ändern muss, dass keine Abfrage, ob gespeichert werden soll, mehr erscheint? Ich möchte den Einsatz des Befehls "Application.DisplayAlerts = False" vermeiden, da damit auch andere Meldungen ausgeblen...
14.04.2003 09:41:56
Thread-ID: 244640
5 Beiträge
ActiveWorkbook.SaveAs Name, True
Andreas X

Hallo erstmal.Eine Mappe soll nacheinander mit zwei verschiedenen Namen abgespeichert werden. Dabei soll nicht die Kontrollfrage erscheinen, ob gespeichert werden soll oder nicht (sofern die Datei bereits existiert).Bei meiner bisherigen Syntax taucht leider die Kontrollfrage auf, ob überschrie...
16.04.2003 13:04:19
Thread-ID: 245857
6 Beiträge
Anzeige
VBA Worksheet aussuchen und aktivieren
Drazen

Hallo,
ich versuche in einer Mappe ein bestimmtes Blatt auszuwählen mit folgendem Code:
Private Sub SIX() Dim ws As Worksheet For Each ws In Worksheets If ws.Name = "T " & lblFirma Then GoTo Weiter: Else Worksheets.Add With ActiveSheet .Name = "T " & lblFirma End With End If Ne...
23.02.2005 14:25:04
Thread-ID: 574646
5 Beiträge
makro mit vba in ein anderes workbook exportieren
derb

hallo.
ist es möglich ein vorbereitetes makro über vba in eine andere tabelle zu exportieren?
01.12.2005 15:10:54
Thread-ID: 703396
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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