Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1440to1444
1440to1444
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Syntax (ohne select)

Forumthread: Syntax (ohne select)

Syntax (ohne select)
19.08.2015 17:37:47
eres
Hallo Excel-Freunde,
auf einem Tabellenblatt habe ich ein Textfeld eingefügt.
Den Inhalt würde ich gerne immer dann, wenn das Textfeld verlassen wird in eine Zelle schreiben.
Das Auslesen funktioniert schon mal:
  ActiveSheet.Shapes.Range(Array("BemerkungsFeld")).Select
MsgBox Selection.ShapeRange(1).TextFrame2.TextRange.Characters.Text
Versuche ich dies ohne SELECT, also 
MsgBox ActiveSheet.Shapes.Range(Array("BemerkungsFeld")).ShapeRange(1).TextFrame2.TextRange.Characters.Text
so bekomme ich Laufzeitfehler 438.
Geht das nicht ohne Select?
Zusatzfrage: Gibt es für ein Textfeld sowas wie ein AfterUpdate - Ereignis oder vielleicht hat jemand einen anderen Tipp ?
Vielen Dank im voraus.
Gruß
eres

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Syntax (ohne select)
19.08.2015 17:47:54
JoWE
Hallo,
so?
MsgBox sheets(1).shapes(1).TextFrame2.TextRange.Characters.Text
Gruß
Jochen

AW: Syntax (ohne select)
19.08.2015 17:56:17
eres
Yep, das funktioniert schon mal Jochen. VIELEN DANK.
Hat noch jemand eine Idee, wie ich abfangen kann, wenn sich der Inhalt des Textfeldes geändert hat?
Herzliche Grüße
eres
Anzeige

Forumthreads zu verwandten Themen

Automargin-Funktion in Textbox auf False setzen
Martin

Hallo zusammen,
Wer kann mir helfen?
Ich möchte die Ränder einer Textbox in einem Diagramm auf 0 setzen
Textbox wird wie folgt einfüge (funktioniert)
ActiveChart.Shapes.AddShape(msoShapeHexagon, pos_x_jahr, pos_y, breite_jahr, hoehe_y).Select
Selection.Name = JZName
Sele...
16.01.2008 10:07:23
Thread-ID: 942177
2 Beiträge
Kein Aufruf einer Powerpointprozedur aus Excel
Christopher

Hallo zusammen,
ich habe ein Problem mit dem automatischen Aufruf einer Powerpointprozedur aus Excel.
Ich werte in einer Excel-Tabelle Daten aus, welche in der Tabelle dann auch im Rahmen von _
Diagrammen aufbereitet werden. Diese wiederum sollen automatisch als Statusreports in e...
30.09.2009 18:04:40
Thread-ID: 1106481
4 Beiträge
Anzeige
Objekt-Eigenschaften mit Variable
Klaus
Hallo,

ich würde gerne die Eigenschaften für Formen in Excel Ein- und Auslesen.
Bsp.
in Zeile 1 stehen meine gewünschten Eigenschaften
Name; TextFrame.Characters.Text; Height...
in Zeile 2 stehen die zugehörigen Werte zu den Eigenschaften
rectangle 1; Figur 1; 20...
23.04.2023 17:58:02
Thread-ID: 1928452
4 Beiträge
Laufzeitfehler b. Erzeugung "fast" gleicher Shapes
Holger

Ich habe diesen Code per Makrorekorder aufgezeichnet und anschließend in den Editor der Arbeitsmappe gepackt
Private Sub Workbook_Open() Worksheets("TableEx").Select '****************************BUTTONs löschen wenn vorhanden****************************** Dim Form For Each Form In ActiveShe...
04.07.2018 17:19:08
Thread-ID: 1632119
1 Beitrag
Langsames Makro
Defence

Hallo Zusammen
Meine Markos laufen sehr langsam. Eigentlich bestehen die nur aus Button wählen und Filtern. Also keine grosse Sache. Aber die benötigen immer etwa 20-30 Sekunden.
Hier mal das Makro. Vielleicht hat jemand eine Idee zur Optimierung.
Sub Suchmaschiene()
'
' Suc...
27.02.2017 12:26:41
Thread-ID: 1544295
3 Beiträge
Anzeige
Shape (Rechteckformen) Prozedur bleibt hängen am Sub End
Brill, Thomas
Hallo

habe ein Prüfformular erstellt. Ganz links sind Shapes (Rechteckformen) die beim klicken einen anderen Text bekommen.
das funktioniert auch schon einigermaßen.
Beim schnellen klicken mehrerer Shapes hintereinander bleibt die Prozedur im Modul modShapeKlick mit einem Fehler...
13.02.2025 14:36:36
Thread-ID: 2005658
2 Beiträge
Excel will als Unicode abspeichern
PaulB.

Hallo
Dies ist mein erstes Posting und startet leider gleich mit einem Problem.
Ich bin ziemlich neu im Bereich VBA.
Aber ich bin dabei nach und nach zu lernen.
Leider habe ich hier ein Problem wo ich nicht weiterkomme.
Das unten stehende Makro lief wie gewünscht.
Im Mak...
30.12.2015 22:24:01
Thread-ID: 1466489
5 Beiträge
Clean Memory
Fabio

Hallo!
Ich habe eine Makro erzeugt, die folgendes macht:
- über einen Knopf kann man Dateien auswählen, die man bearbeiten möchten. Es wird in Excel eine Liste erzeugt;
- über einen 2. Knopf werden die Dateien in der Liste über den Excel-Import eingelesen (es handelt sich um Messdat...
30.01.2014 17:25:32
Thread-ID: 1347382
8 Beiträge
Daten für x-Achse festlegen
Stoepsel

Hallo!
Ich beschäftige mich erst seit Kurzem mit VBA.
Ich will mit Daten ein Diagramm erzeugen, das funktioniert auch ganz gut außer, dass für die x-Achse nicht die markierten Daten sondern die Spaltenzahl verwendet wird.
Hier der Code:
ActiveChart.PlotArea.Select
ActiveChar...
19.03.2013 12:07:07
Thread-ID: 1304724
6 Beiträge
Zellwert in Textfeld
Tom

Hallo zusammen,
ich habe eine Liste mit Begriffen von A1:A250
Nun möchte ich diese Begriffe
- in ein eigenes Textfeld rechts daneben z.B. Spalte B:F
- dieses Textfeld ohne Linie und Füllung schwarz
- Schriftart weiß
Ich habe es mit dem Makrorekorder versucht, aber das is...
16.11.2012 13:10:27
Thread-ID: 1286936
4 Beiträge
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum