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

In ein Textfeld von einer Pivotabelle etwas kopier

Forumthread: In ein Textfeld von einer Pivotabelle etwas kopier

In ein Textfeld von einer Pivotabelle etwas kopier
14.09.2016 09:59:33
einer
Hallo zusammen,
ich habe ein Diagramm anbei das Screenshot.
Userbild
in die 2 grauen Textfelder (Textfeld 4 & 5) möchte ich etwas kopiert haben. Eine Gesamtanzahl. Also es soll zbsp stehen "Gesamtanzahl 129". Einfach per Formel funktioniert nicht, kommt immer eine Fehlermeldung:
=PIVOTDATENZUORDNEN("Material";'Pivot SNR'!$A$3;"Zielland";"CHINA") TEXTFELD 4
=PIVOTDATENZUORDNEN("Material";'Pivot SNR'!$A$3;"Zielland";"SÜDAFRIKA") TERXTFELD 5
Es müsste halt eine Aktulalsierung noch dabei sein :)
Vielen Dank im Voraus.
lg
René
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: In ein Textfeld von einer Pivotabelle etwas kopier
15.09.2016 10:04:43
einer
Habe selbst das Problem gelöst, anbei mal die Lösung
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Shapes("Textfeld 4").TextFrame.Characters.Text = "Gesamtanzahl" & " " & ActiveSheet. _
Range("J8")
ActiveSheet.Shapes("Textfeld 5").TextFrame.Characters.Text = "Gesamtanzahl" & " " & ActiveSheet. _
Range("J9")
End Sub

Anzeige

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
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
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
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
Anzeige

Infobox / Tutorial

Text in ein Textfeld von einer Pivotabelle kopieren

Schritt-für-Schritt-Anleitung

Um Text in ein Textfeld von einer Pivotabelle zu kopieren, kannst Du VBA (Visual Basic for Applications) verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

  1. Öffne Deine Excel-Datei: Stelle sicher, dass die Pivotabelle, in der Du arbeiten möchtest, bereits erstellt ist.
  2. Öffne den VBA-Editor: Drücke ALT + F11, um den VBA-Editor zu öffnen.
  3. Füge ein neues Modul hinzu:
    • Klicke mit der rechten Maustaste auf "VBAProject (DeineDatei.xlsx)".
    • Wähle "Einfügen" > "Modul".
  4. Füge den folgenden Code ein: 
    Private Sub Worksheet_Change(ByVal Target As Range)
   ActiveSheet.Shapes("Textfeld 4").TextFrame.Characters.Text = "Gesamtanzahl" & " " & ActiveSheet.Range("J8")
   ActiveSheet.Shapes("Textfeld 5").TextFrame.Characters.Text = "Gesamtanzahl" & " " & ActiveSheet.Range("J9")
End Sub
  5. Schließe den VBA-Editor: Speichere Deine Änderungen und schließe den Editor.
  6. Teste die Funktion: Ändere die Werte in den Zellen J8 und J9, um zu sehen, ob die Textfelder aktualisiert werden.

Häufige Fehler und Lösungen

  • Fehler: Textfeld existiert nicht

    • Lösung: Stelle sicher, dass die Namen der Textfelder ("Textfeld 4" und "Textfeld 5") korrekt sind. Du kannst die Namen in den Eigenschaften des Textfeldes überprüfen.

  • Fehler: Makro funktioniert nicht

    • Lösung: Überprüfe, ob Makros in Deiner Excel-Anwendung aktiviert sind. Du kannst dies in den Excel-Optionen unter "Trust Center" einstellen.

Alternative Methoden

Wenn Du kein VBA verwenden möchtest, kannst Du auch folgende Methoden ausprobieren:

  1. Formeln verwenden: Verwende Formeln in angrenzenden Zellen, die dann manuell in die Textfelder kopiert werden.
  2. Datenverknüpfung: Verlinke die Textfelder direkt mit Zellen, indem Du das Textfeld auswählst und in der Formelleiste =J8 oder =J9 eingibst.

Praktische Beispiele

Hier sind zwei praktische Beispiele, wie Du die oben genannten Schritte umsetzen kannst:

  • Beispiel 1: Wenn Du die Gesamtanzahl für "CHINA" berechnen möchtest, benutze die Formel:

    =PIVOTDATENZUORDNEN("Material";'Pivot SNR'!$A$3;"Zielland";"CHINA")

    und verlinke diese Zelle mit Deinem Textfeld.

  • Beispiel 2: Für "SÜDAFRIKA" kannst Du die gleiche Technik verwenden wie in Beispiel 1, aber die Zelle anpassen, wo das Ergebnis gespeichert wird.

Tipps für Profis

  • Automatisierung: Du kannst den VBA-Code so anpassen, dass er auch bei anderen Ereignissen wie Worksheet_Activate oder Worksheet_Calculate ausgeführt wird.
  • Fehlerbehandlung: Füge Fehlerbehandlungsroutinen in Deinen VBA-Code ein, um mögliche Probleme bei der Ausführung abzufangen.

FAQ: Häufige Fragen

1. Kann ich mehrere Textfelder gleichzeitig aktualisieren?
Ja, Du kannst den VBA-Code so anpassen, dass mehrere Textfelder gleichzeitig aktualisiert werden, indem Du weitere Zeilen für die entsprechenden Textfelder hinzufügst.

2. Funktioniert das auf allen Excel-Versionen?
Ja, die beschriebenen Methoden sind in Excel-Versionen ab 2010 verfügbar, solange VBA unterstützt wird.

Beliebteste Forumthreads (12 Monate)

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