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

Per Makro Texte in Tabellenfelder füllen

Forumthread: Per Makro Texte in Tabellenfelder füllen

Per Makro Texte in Tabellenfelder füllen
06.08.2014 09:11:19
Renate
Guten Tag,
ich möchte per Makro in sämtlichen Tabellenblättern einer Mappe jeweils in das gleiche Feld - z. B. range("Q14") - den gleichen Texteintrag vornehmen. Könnt Ihr mir bitte bei der Schleife helfen? For i = 1 to ................. next.
Schönen Dank für Eure Hilfe.
Renate

Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Per Makro Texte in Tabellenfelder füllen
06.08.2014 09:22:29
Matthias
Hallo
Dim x&
For x = 1 To Worksheets.Count
Worksheets(x).Range("Q14") = "Hallo World"
Next
Gruß Matthias

AW: Per Makro Texte in Tabellenfelder füllen
06.08.2014 09:46:49
Jan
Danke Matthias,
es funktioniert. Könntest Du mir bitte noch sagen, wie ich die Breite von Spalte Q per VBA verändere?
Im Voraus schon ganz herzlichen Dank für Deine Unterstützung.
Renate

Anzeige
AW: Per Makro Texte in Tabellenfelder füllen
06.08.2014 09:53:27
Daniel
Hi
Solche Fragen kann man sich mit Hilfe des Makrorecorders leicht selbst beantworten, in dem an die Aktion von Hand ausführt und mit dem Recorder aufzeichnet.
Dann kannst du dir die erzeugten Befehle im Codefenster anschauen.
Gruß Daniel

AW: Per Makro Texte in Tabellenfelder füllen
06.08.2014 09:56:33
Werner
Hallo Jan,
Dim x&
For x = 1 To Worksheets.Count
Worksheets(x).Range("Q14") = "Hallo World"
Woksheets(x).Columns("Q:Q").ColumnsWidth = 10
Next
Gruß Werner

Anzeige
AW: Per Makro Texte in Tabellenfelder füllen
06.08.2014 10:08:38
Jan
Danke Werner,
es klappt. Habe etwas gebastelt wg. "Column(s)Width".
Einen schönen Tag.
Jan

AW: Per Makro Texte in Tabellenfelder füllen
06.08.2014 11:14:00
Werner
Hallo Jan,
sorry für das s das mir da reingerutscht ist aber du bist ja selbst drauf gekommen.
Mit der Codezeile
Worksheets(x).Columns("Q:Q").AutoFit
kannst du das natürlich auch so einstellen, dass sich die Spaltenbreite automatisch an die Textlänge anpasst.
Gruß Werner

Anzeige
AW: Per Makro Texte in Tabellenfelder füllen
06.08.2014 11:28:58
Jan
Hallo Werner,
Oh, der Tipp ist prima. Danke Dir, das hilft mir.
Gruß Jan

AW: Per Makro Texte in Tabellenfelder füllen
06.08.2014 12:45:45
Werner
Hallo Jan,
hier noch eine Version mit einer Inputbox für die Eingabe des Textes.
Dim x&
Dim strName As String
strName = InputBox("Bitte den Text eingeben:")
If strName = Falsch Then Exit Sub
For x = 1 To Worksheets.Count
Worksheets(x).Range("Q14") = strName
Worksheets(x).Columns("Q:Q").AutoFit
Next
Wobei hier die Variable strName als String (Textfolge) dimensioniert ist. Solltes du auch Zahlen eingeben um dann mit diesen weiter zu rechnen dann müsste die Variable strName als Variant dimensioniert werden sonst funktioniert es nicht.
Gruß Werner

Anzeige
AW: Per Makro Texte in Tabellenfelder füllen
06.08.2014 13:09:59
Jan
Hallo Werner,
das ist noch eine Erleichterung. Ich denke, dass ich > Falsch Danke und Gruß
Jan

AW: Per Makro Texte in Tabellenfelder füllen
06.08.2014 10:10:03
JoWE
Hallo Renate,
oder auch so: 
Sub multifill()
Sheets("Tabelle1").Range("Q14") = "Excellent!"
Sheets(Array("Tabelle1", "Tabelle2", "Tabelle3")).FillAcrossSheets Sheets("Tabelle1").Range( _
"Q141")
End Sub

Gruß
Jochen

Anzeige
AW: Per Makro Texte in Tabellenfelder füllen
06.08.2014 10:21:31
Jan
Hallo Jochen,
lese ich den Code richtig, dass ich dann sämtliche Tabellenblätter einzeln aufführen müsste? Wenn ja, ist mir die Schleife schon lieber, denn es sind deren sehr viele. Außerdem ist die Sache im Fluss, es kommen ständig welche dazu bzw. es fallen welche weg.
Schöne Grüße
Renate

Anzeige
AW: Per Makro Texte in Tabellenfelder füllen
06.08.2014 10:54:13
JoWE
Hallo Renate,
ja - Du liest richtig.
Unter den jetzt genannten Voraussetzungen ist die For-Next-Schleife tatsächlich die bessere Lösung.
Gruß
Jochen
;

Forumthreads zu verwandten Themen

Frage - Spalten einfügen & Spalten untereinander z
André

Hallo zusammen!
Ich habe da als blutiger Anfänger in VBA zwei Fragen:
1.) Wie kann ich in meiner Tabelle in jeder zweiten Spalte 4 leere Spalten einfügen lassen?
2.) Dann möchte ich unter den Inhalt der ersten fünf Spalten (A-E) den Inhalt der zweiten 5 Spalten (F-J) usw. In der grö...
08.08.2008 16:00:00
Thread-ID: 1000340
3 Beiträge
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:33:59
Thread-ID: 1000866
3 Beiträge
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:34:08
Thread-ID: 1000867
5 Beiträge
Anzeige
Formel "Text" ROTE Zahl bei Minuswert?
dieter(drummer)

Hi Formelspezialisten,
in Zelle B2 steht dise Formel (funktionert auc h):
=TEXT(I4-D4;"00.0")&" ("&TEXT(I4/D4-1;"0%")&")".
Mein Ziel, dass eine Minuszahl in ROT erscheint. Hab's mit bedingte Formatierung versucht und bekomme es nicht hin.
Gibt es eine Möglichkeit, a...
12.08.2008 10:59:29
Thread-ID: 1001135
7 Beiträge
Anzeige
Zeilenmerkmale in Spalten umwandeln
MG_Learning

Hallo zusammen!
Ich habe keine Ahnung, wie ich aus folgender Tabellenstruktur: Beispiel:
A B C
London 20 Kinos
London 50 Gaststätten
London 10 Einkaufscentren
Paris 18...
17.08.2008 18:31:50
Thread-ID: 1002449
4 Beiträge
Anzeige
In Spalte nach Anzahl eines Begriffs suchen?
Lauren

Hall Leute!
ich will nach einem Begriff, in meinem Fall nach "SUMs" in der Spalte C suchen und wissen wie oft es in der Spalte vorkommt.
Bei Berechnungen funktioniert es mit ZÄHLENWENN ohne Probleme aber wie erhalte ich die "absolute" Zahl?
Vielen Dank für Eure Hilfe!
Grüße
...
19.08.2008 11:08:23
Thread-ID: 1002846
5 Beiträge
Anzeige
Jede 2te Zeile in eine Spalte kopieren
Eddie

Guten Morgen @ all
Ich habe mal wieder ein kleines problem :-)
Ich würde gerne Daten, die alle in einer Spalte sind auteilen.... dazu soll entweder der 1,3,5,7.... oder 2,4,6,8 ... Wert immer in die danebenliegende Spalte kopiert werden
IST:
Hallo
Hello
Gut
Good
...
20.08.2008 07:52:00
Thread-ID: 1003065
6 Beiträge
Textteile in Zellen mit Liste vergleichen
susidimarca

Hallo,
ich habe derzeit ein kniffeliges Excelproblem.
ich möchte gerne den Text in Zellen
hjgshgjdf Kriterium2 kjhfkjhfksdjhf
dskj Kriterium1 ajdhasjdhakjdhakdhajkdhajkdakj
daudzauizdaiudzaidzaisdz Kriterium3 kajhdasks
mit den Kriterium eine anderen Tabelle vergleichen...
21.08.2008 10:05:00
Thread-ID: 1003378
6 Beiträge
Suchfunktion - TextBox kein Text sondern Datum
Frank

Hallo Liebe Excelgemeinde!!!
In einer UserForm befindet sich folgender Code um bestimmte Einträge zu suchen. Da in der TextBox1 aber kein Text sondern ein Datum steht funktioniert dies nicht, da kommt die Meldung " Suchbegriff wurde nicht gefunden".
Was muss ich ändern, damit auch nach...
21.08.2008 15:35:00
Thread-ID: 1003541
4 Beiträge
Wenn nur Text in Zelle...
MichiM

Hallo,
ich habe eine umfangreiche Artikelliste (ca. 250.000 Artikel) aus einer Datanormdatei erstellt.
Aus dieser muss ich jetzt alle Artikel entfernen, dessen Artikelnummer (in Spalte A; als Text formatiert, damit führende Nullen nicht gelöscht werden) keinerlei Zahlen enthalten.
E...
22.08.2008 16:24:44
Thread-ID: 1003960
4 Beiträge
Hintergrundfärbung in UserForm Textbox in Zelle...
Josef

Guten Morgen!
wie ich Daten über Userform TextBoxen in die Zellen zurückschreibe, dafür habe ich bereits eine Lösung.
Is es jedoch möglich einen gefärbten Hintergrund einer TextBox in die dafür vorgesehene Zelle zu übertragen?
Wenn ja, wie würde dann bitte eine VBA Lösung lauten?
28.08.2008 06:57:47
Thread-ID: 1005257
10 Beiträge
Spalten in Zeilen anhängen
Jörg

Hallo zusammen,
in einer Tabelle mit ~1000 Artikeln in Spalte A stehen jeweils in den Spalten B-M die 12 zum Artikel gehörenden Monatswerte des Verbrauchs.
Ich brauche diese Daten jetzt so angeordnet, dass weiterhin alle Artikel in Spalte A stehen, jedoch die einzelnen Monatswerte unter...
01.09.2008 18:03:42
Thread-ID: 1006570
11 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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