Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1228to1232
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
1228to1232
1228to1232
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA-Schreibweise: [A1].Select

VBA-Schreibweise: [A1].Select
Günther
Hallo
Ich bin kürzlich über eine sehr kompakte Schreibweise zum Ansprechen von Zellen und Bereichen (aus einem Makro heraus) gestoßen. Neben dem bekannten Range("A1") oder Cells(1,1) stellen auch folgende Zeilen gültige Excel-VBA-Makro-Befehle dar:
[A1] = "Hallo!"
MsgBox [A1]
[A1:B3].Interior.Color = vbRed
Mich würde interessieren, ob diese Schreibweise irgendwelche Nachteile hat, denn in der üblichen Literatur und den meisten Makros wird (meines Wissens) standardmäßig meist nur mit Range und Cells gearbeitet.
Möglicherweise weiß auch jemand einen theoretischen Background, warum diese Schreibweise überhaupt existiert und funktioniert (z.B. „Kompatibilitätsmüll“ aus anno Schnee ö.ä.).
Grüße
Günther
AW: VBA-Schreibweise: [A1].Select
14.09.2011 18:50:24
mumpel
Hallo!
Diese Schreibweise ist nicht zu empfehlen, da zu langsam. Zellen sollten immer direkt referenziert werden. Also bitte vergiss diese Art der Programmierung sofort wieder.
Gruß, René
AW: VBA-Schreibweise: [A1].Select
14.09.2011 20:19:47
Günther
Hallo René,
Danke für die Info. Habs mal bezüglich Geschwindigkeit getestet und folgende Werte (im Vergleich zur Range-Anweisung) rausbekommen: (cells ist unwesentlich schneller als Range)
[A1] = "Hallo!" 'ca. 20% langsamer
[A1].Interior.Color = vbRed 'ca. 25% langsamer
[A1].select 'ca. 45% langsamer
Bei performancekritischen Makros sicher ein wesentliches Argument, aber bei den typischen Kurzmakros, die dann statt 1,5 Sekunden vielleicht 2 Sekunden dauern, scheint mir die langsamere Geschwindigkeit nicht so dramatisch ins Gewicht zu fallen.
Du schreibst, dass diese Schreibweise keine direkte Referenzierung der Zelle darstellt. Was meinst Du damit?
Grüße Günther
Anzeige
AW: VBA-Schreibweise: [A1].Select
14.09.2011 21:38:44
Gerd
Hallo Günther,
die eckigen Klammern stehen für Evaluate(Auswerten). Das wohl ein Relikt aus der xl4Makro-Zeit.
Kürzer ist nicht immer besser.
Gruß Gerd
AW: VBA-Schreibweise: [A1].Select
14.09.2011 23:47:25
Luschi
Hallo Excel-Fan's,
habe mehrfach folgende 3 Tests in Excel 2010 gemacht:

Sub test1()
Debug.Print Time
For i = 1 To 1000000
Evaluate ("[A" & i & "] = 9")
Next i
Debug.Print Time
End Sub
Sub test2()
Debug.Print Time
For i = 1 To 1000000
ActiveSheet.Range("B" & i) = 9
Next i
Debug.Print Time
End Sub
Sub test3()
Debug.Print Time
For i = 1 To 1000000
ActiveSheet.Cells(i, 3) = 9
Next i
Debug.Print Time
End Sub
Ergebnis:
test1: 14 ... 16 Sekunden
test2: 50 ... 55 Sekunden
test3: 40 ... 42 Sekunden
Bei mir ist also eindeutiger Testsieger die Prozedur 'test1' und kann deshalb Mumpels Aussage wegen der Langsamkeit von [A1] gegenüber Range("A1") nicht bestätigen.
Nachteil von [A1] : Es muß die richtige Tabelle aktiv sein
Vorteil von [A1] : Bei Verwendung von Arbeitsmappen-Bereichsnamen benötigt man keine weitere Referenzierung.
[meinName].Value = 12
kann also im Vba-Code an jeder Stelle so aufgerufen werden und der Wert wird in die richtige(n) Zelle(n) geschrieben. Wenn [meinName] den Zellbereich Workbooks("meineArbeitsmappe.xls").Worksheets("meineTabelle").Range("A1:A100") repräsentiert, dann steht in allen diesen Zellen der Wert '12'. Das funktioniert auch, wenn man diesen Vba-Code aus einem AddIn aufruft und in eine der geöffneten Arbeitsamappen gibt es diesen vergebenen Namen.
Was will man mehr.
Gruß von Luschi
aus klein-Paris
PS: mein Allerweltstest-PC:
Prozessor: E6600
RAM: 4 GB
BS: Windows7-32bit
Software: MS-Office 2010 Prof Plus
Anzeige
AW: VBA-Schreibweise: [A1].Select
15.09.2011 03:50:13
mumpel
Also doch schneller als immer behauptet wird?
Aber dennoch: Jeder Programmierer der was auf sich hält, nutzt diese alte Programmierweise nicht.
Falscher Test
15.09.2011 11:22:00
Rudi
Hallo,
in Test 1 ermittelst du ja nur, ob Ai=9 ist. In den anderen schreibst du 9 in die Zellen. Das ist doch was ganz anderes.
Gruß
Rudi
AW: Falscher Test
15.09.2011 11:36:59
Daniel
Genau so schauts aus, da werden völlig verschiedene Sachen mit einander verglichen.
ein Realistisches Szenario würde folgenden Befehl verwenden:
Schreiben: [A1] = 9 / Range("A1") = 9 / Cells(1,1) = 9
Lesen: x = [A1] / x = Range("A1") / x = Cells(1,1)
damit komme ich auf folgende Zeiten (bei 10.000 durchläufen)

schreiben:  [A1]    1,6328125
Range() 1,5078125
Cells() 1,4296875
lesen:     [A1]    0,140625
Range() 0,09375
Cells() 0,0625

was klar gegen die [..]-Schreibweise spricht.
des weiteren kann man hier nicht mit Variablen arbeiten, was die Verwendung weiter einschränkt.
Gruß, Daniel
Anzeige
Richtig, Daniel & Rudi! Und das war schon aus ...
15.09.2011 15:20:37
Luc:-?
…den 1.Tests zu erkennen! Warum Luschi da überhpt Evaluate einsetzt und Mumpel dann noch darauf reinfällt, ist mir völlig schleierhaft!
Gruß Luc :-?
AW: Richtig, Daniel & Rudi! Und das war schon aus ...
15.09.2011 16:46:58
mumpel
Das ist mir auf Arbeit dann auch eingefallen. Im Beispiel des TO taucht Evaluate nämlich gar nicht auf.
Na dann iss ja jut ... ;-) Gruß owT
15.09.2011 22:48:48
Luc:-?
:-?

107 Forumthreads zu ähnlichen Themen

VBA Zellen mit x kopieren aber nur bestimmte Zellen
balta

Hallo zusammen,
habe folgendes problem, undzwar sieht meine Tabelle so aus
__A____B______C______D_____E_______F_____G____H
1_x___alf___test1_________________1234___a____ist ein Auto
2_y________________Ulf____test2__________b____ist ein Krad
3
4
5
6_y_____________...
26.09.2008 23:48:47
Thread-ID: 1012775
6 Beiträge
Anzeige
Wert mit VBA suchen und Zelle aktivieren
Nico

Moin
Ich habe eine Abrechnungsdatei und folgendes Problem
In einem Tabellenblatt werden Informationen wie Firmenname und Co. eingetragen.
In der letzten Spalte dieses Blatte möchte ich gerne das Datum per VBA eintragen lassen, an dem ich die Rechnungsnummer über mein Abrechnungstabe...
16.02.2009 16:07:00
Thread-ID: 1051203
2 Beiträge
mit VBA bestimmte Zellen suchen, ersetzen
AndreasK

Hallo zusammen, ich hab folgendes Problem und komm mal wieder nicht weiter.
Ich möchte im aktiven Arbeitsblatt den Inhalt aller Zellen die die Zeichenfolge "gs" enthalten löschen.
Ebenso den Inhalt der 5 benachbarten rechten Zellen.
Wenn also z.B. in der Zelle F17 der Inhalt gs i...
10.07.2009 10:34:09
Thread-ID: 1087622
8 Beiträge
Anzeige
Stichwort in Zelle B7,dann zusammzählen VBA
Wolfgang

Hallo,
im Tabellenblatt "Start" befinden sich in Zelle B7 bis B23 bestimmte Stichwörter, die auch in Tabelle "Daten", Spalte H vorkommen. Ich würde gerne zu jedem Stichwort zwei Abfragen klären:
Beispiel:
(Abfrage1)
1. Stichwort aus Zelle B7 kommt in Spalte H (Tabelle "Daten") v...
06.10.2009 19:49:07
Thread-ID: 1107632
10 Beiträge
VBA: Zellen selektieren bei geteiltem Fenster ?
Melanie

Hallo,
ich habe ein grosse Excel Tabelle mit vielen Zeilen und habe das Fenster horizontal aufgeteilt, damit ich beim manuellen Scrollen nach unten immer die obersten Zeilen unveraendert sichtbar habe.
Nun moechte ich per VBA verschiedene Zellen im unteren Bereich selektieren und aktiv...
21.10.2009 23:54:36
Thread-ID: 1111215
3 Beiträge
gehe zu Zelle mit Inhalt (Leer)
Hugo

Guten Morgen allerseits
Wie bringe ich es mittels VBA fertig, dass der Curser von irgendeiner Stelle im Tabellenblatt auf die Zelle in Spalte A springt in welcher (Leer) steht?
Zudem möchte ich, dass anschliessend die enstsprechenden Zellen (mit sämtlichen Inhalten) in Spalten A-G gelös...
15.01.2010 07:55:24
Thread-ID: 1130123
4 Beiträge
Gehezu (F5) Zellbezug der aktuellen Zelle
Rainer

Hallo Excel Experten,
ich springe in meiner Rechnungsexcel Arbeitsmappe oft kreuz und quer zu den älteren Rechnungsblättern.
Ich nutze i.d.R. in einem Übersichtsblatt den Zellbezug zur Endsumme auf dem jeweiligen RechnungsBlatt.
Allerdings muss ich jedesmal nach drücken der F5 Ta...
20.04.2010 14:07:31
Thread-ID: 1152880
9 Beiträge
Makro: Buttonklick = Blatt u. Zelle auswählen
tuska

Hallo,
ich habe mit dem Makrorecorder Code aufgezeichnet und in Tabelle 1 einen Button angelegt.
Den Button habe ich mit dem Code Private Sub CommandButton1_Click() Sheets("Tabelle2").Select Range("E6").Select End Sub
belegt, jedoch erhalte ich zu Range("E6").Select immer eine Feh...
09.07.2010 21:56:49
Thread-ID: 1166414
5 Beiträge

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
5
2
1
7
3
9
2
3
8
4
2
2
2
2
9
4
3
5
4
10
6
1
12
1
4