Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 09:53:18
Wartungsliste automatisch aktualisieren
24.04.2024 09:36:02
Wenn Wert x in Zelle a, dann Wert y in Zelle b
24.04.2024 09:24:20
Textketten erstellen mit unterschiedlichen Anzahl an Feldern
24.04.2024 09:04:14
Erfahrung Umstieg in Sharpoint
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1132to1136
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1132to1136
1132to1136
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bereich auswählen, Namensmanager - VBA

Bereich auswählen, Namensmanager - VBA
Jonathan
Hallo zusammen!
Ich habe ein Makro aufgezeichnet, zum def. von Namensbereichen. Der ausgewählte Bereich wird in VBA wie folgt ausgegeben: 
"=Ursprungsdaten!R18C13:R26C13"
Nun soll dieser Bereich aber immer automatisch ermittelt werden.In Zelle M17 steht die Überschrift des Bereiches, es sollen also alle Zellen von M17:Mx (letzte Zeile im Bereich von M17:M25, da darunter wieder weitere Daten stehen, welche nicht berücksichtigt werden sollen) definiert werden.
Jetzt komme ich zu der zweiten Frage:
Mit 
ActiveWorkbook.Names.Add

Habe ich es geschafft, neue Namensbereiche zu erstellen, allerdings tritt ein Problem auf, wenn der Name schon besteht. Irgendwie muss also vorher geprüft werden, ob der Bereich existiert, wenn ja, soll er erweitert werden. Dies habe ich aufgezeichnet: 
ActiveWorkbook.Names("OKForderungen").RefersToR1C1

Wofür steht das RefersToR1C1 und wie kann ich überprüfen, ob der Name besteht?
Ich hoffe, Ihr könnt mir bei dieser umfangreichen Sache kurz helfen.
LG
Jonathan

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Bereich auswählen, Namensmanager - VBA
01.02.2010 09:30:14
Renee
Hi Jonathan,
Wieso brauchst du dazu VBA ?
Definier doch deinen Namen einmal in der Mappe und er passt sich automatisch an: 
=BEREICH.VERSCHIEBEN(OKForderungen!$M$17;0;0;ANZAHL2(OKForderungen!$M$17:$M$25))

Voraussetzung ist, das in den Zeilen 17..25 keine Leerzeilen vorkommen.
GreetZ Renée
AW: Bereich auswählen, Namensmanager - VBA
01.02.2010 12:46:29
Jonathan
Hey,
danke für den Tipp - leider ist die Anzahl der Leerzeichen genau ein Problem. Das zweite ist, dass ich einen bestimmten Bereich vorgegeben habe, in dem auch neue Bereiche erstellt werden können (klingt jetzt schwachsinnig, ist aber wichtig...) und dies soll halt automatisch mit VBA passieren...
Anzeige
AW: Bereich auswählen, Namensmanager - VBA
01.02.2010 13:33:40
Renee
Hi,
So schnell wechsle ich nicht auf VBA ;-)
Mit Leerzeilen (was du mit Leerzeichen ist mir nicht klar!): 
=BEREICH.VERSCHIEBEN(Tabelle2!$M$17;0;0;VERWEIS(2;1/(Tabelle2!$M$17:$M$25"");ZEILE(Tabelle2!$M:$M)) )
GreetZ Renée
AW: Bereich auswählen, Namensmanager - VBA
01.02.2010 23:42:14
Jonathan
Hey,
das "Problem" und der Grund für eine VBA Lösung ist, dass ich die Spalten A-Z (z.B.) vorgebe. In Zeile 1 KANN eine Überschrift für den Bereich vergeben werden, in den Zeilen 2-15 können dann die Werte des Bereichs eingegeben werden. Steht in Zeile 1 nichts, gibts auch keinen Bereich. Erst wenn eine Eingabe erfolgt, soll ein Bereich def. werden. Erweiter ich die Werte einer Spalte, soll der Bereich angepasst werden.
Die Formel für den Bereich funktioniert ja nur bei bereits selbst def. Bereichen.
Ich hoffe, ich konnte es einigermaßen verständlich erklären!?
LG
Anzeige
AW: Bereich auswählen, Namensmanager - VBA
02.02.2010 11:17:02
Renee
Hi Jonathan,
...jetzt kann ich dir leider nicht mehr folgen. Error: inconsistent information overflow... ;-)
Um auf deine Ursrpungsfragen zurückzukommen.
1. Grundsätzlich gibt es in VBE eine Hilfsfunktion, also Cursor auf .RefersToR1C1 und F1 drücken. Diese Eigenschaft gibt an auf welchen Bereich / Formel sich der Name bezieht.
2. Testen ob Name schon existiert kannst du mit testen auf einen VBA-Fehler abfangen: 
    Dim strBezug As String
On Error Resume Next
strBezug = ThisWorkbook.Names("BlaBla").RefersToR1C1
If Err = 0 Then
MsgBox "Bezieht sich auf: " & strBezug
Else
MsgBox "Name existiert nicht!"
End If
On Error GoTo 0

GreetZ Renée
Anzeige

300 Forumthreads zu ähnlichen Themen

VBA - Bereich ändern
Rei

Liebe Herber-Excelgemeinde
Leider komm ich nicht weiter, obwohl sehr viel in diesem Code beschrieben ist.
Habe diesen code im I-Net gefunden und find in toll.
dieser erlaubt, den Autofilter automatisch zu aktualisieren.
Aber ich bring es aufgrund zu wenig wissen nicht auf die Re...
11.08.2017 15:11:15
Thread-ID: 1573993
2 Beiträge
Anzeige
Sheetcode in VBA project schreiben
Dirk

Hallo Forum,
ich habe mal wieder ein Problem und brauche Eure Hilfe.
Ich versuche per VBA Macrocode in ein Sheet zu schreiben. Das funktioniert auch fuer den ersten Schleifendurchlauf meines Programms. Beim zweiten durchlauf stuerzt Excel leider ab :-(
Woran koennte das liegen? Anb...
27.08.2008 14:10:00
Thread-ID: 1005083
5 Beiträge
Worksheet über Codename ein/ausblenden
Reinhard

Hallo Wissende,
geht es auch direkt ein Worksheet anhand des Codenamen ein/auszublenden?
Eine Schleife kriege ich hin, die alle Blätter durchläuft und wenn der gesuchte Codename gefunden ist dieses Blatt/Worksheet aus/einblendet.
Meine Frage ist also, geht das auch ohne Schleife?
28.08.2008 16:28:02
Thread-ID: 1005518
6 Beiträge
Anzeige
Sheet-Name in Zelle
Frank

Hallo,
mit folgendem Code lege ich ein neues Sheet an
ich möchte das der Namen des neuen Sheets auch in Zelle A2 eingetragen wird.
Nur wie?
Könnte mir bitte jemand weiterhelfen.
Private Sub ComboBox6_Change() End Sub
Private Sub CommandButton1_Click() Application.Sc...
30.10.2008 11:39:38
Thread-ID: 1020547
4 Beiträge
VBA ExcelDateinamen und Arbeitsblattnamen einlesen
MarkusL

Hallo,
gibt es per VBA eine Möglichkeit alle Excel Dateien eines Verzeichnisses inkl. der jeweils enthaltenen Arbeitsblattnamen einzulesen (der Name der Exceldatei sollte ohne .xls ausgegeben werden), so dass nachfolgendes Ergebnis erzeugt wird:
Dateiname.......Arbeitsblattname
Date...
16.11.2008 15:07:00
Thread-ID: 1024906
5 Beiträge
Monatsnamen mit Jahr (VBA)
Andre´

Hallo alle zusammen,
mit folgenden Makro schreibe ich das aktuelle Datum in A1:
Sub Monat() Range("A1") = Str(Date) End Sub
in A1 steht dann:
18.11.2008
Jetzt möchte ich aber den Monatsnamen und das Jahr in A1 wie folgt haben:
November 2008
Kann mir bitte jemand e...
18.11.2008 17:30:00
Thread-ID: 1025713
11 Beiträge
per VBA kopieren, kein Namenskonflikt
Peter

Guten Tag
Beim Kopieren eines Bereiches mit VBA in eine andere Tabelle erhalte ich die Meldung:
"Die Formel, die eingefügt werden soll, enthält einen Namen, der bereits in der Zieltabelle vorhanden ist. Soll die vorhandene Definition von 'xxxxx' verwendet werden?
* Klicken Sie auf '...
11.12.2008 10:45:09
Thread-ID: 1031973
3 Beiträge
worksheet.activate über Name aus Eigenschaften
michael

Hallo Kollegen.
Folgendes Thema:
Ich habe eine Datei als Kopiervorlage, bei der das erste Blatt nicht umbenannt werden soll, weil ich beim schließen der Datei dorthin zurück springe und Aufgaben erledige.
Erst habe ich über Application.CommandBars("ply").Enabled = True die Funktion...
20.01.2009 19:10:54
Thread-ID: 1041968
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
2
4
5
3
3
4
10
2
4
7
7
11
4
3
2
1
11
2
6
7
7
3
5
5