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

Text aus zelle nach PPT schreiben

Forumthread: Text aus zelle nach PPT schreiben

Text aus zelle nach PPT schreiben
Joachim
Hallo
ich möchte den Inhalt aus verschiedenen Zellen nach PPT bringen. Soll zB so aussehen.
Nach ausführen des makros soll ppt geöffnet werden, dort ein textfeld mit Größe zB 100 , 50 angelegt werden und das in der Position 80 von oben und 200 von links.
Darin soll der Text aus A2 geschrieben werden.
hat da jemand eien Idee ?
Danke mal
Joachim
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Text aus zelle nach PPT schreiben
03.05.2010 10:22:37
ChrisL
Hi Joachim
Sub Create_PowerPoint_Slides()
Dim oPA As PowerPoint.Application
Dim oPP As PowerPoint.Presentation
Dim oPS As PowerPoint.Slide
Dim oShape As PowerPoint.Shape
Set oPA = New PowerPoint.Application
oPA.Visible = msoTrue
Set oPP = oPA.Presentations.Add(msoTrue)
oPP.Slides.Add 1, ppLayoutBlank
Set oPS = oPP.Slides(1)
Set oShape = oPS.Shapes.AddTextbox(msoTextOrientationHorizontal, 200#, 80#, 100#, 50#)
oShape.TextFrame.WordWrap = msoTrue
oShape.TextFrame.TextRange.Text = Worksheets("Tabelle1").Range("A2")
End Sub
Extras, Verweise, Microsoft Powerpoint setzen
cu
Chris
Anzeige
AW: Text aus zelle nach PPT schreiben
04.05.2010 07:25:51
Joachim
Hallo Chris,
Danke, das funktioniert gut :-)
Ich wollte Dein Code erweitern, damit ich auch noch mehrerer Textboxen in PPT beschreiben kann
A3 = Textbox3
A4 = Textbox4...
Das bekomme ich aber nicht hin. Kannst Du mir bitte den Code so erweitern, damit ich sehen kann, wie ich den Code bei mehreren Zellen fortführen muss ?
PS : jedes Textfeld sollte sich aber seperat (wie beim ersten) positionieren lassen.
Danke
Joachim
Anzeige
AW: Text aus zelle nach PPT schreiben
04.05.2010 11:01:38
ChrisL
Hi Joachim
Sub Create_PowerPoint_Slides()
Dim oPA As PowerPoint.Application
Dim oPP As PowerPoint.Presentation
Dim oPS As PowerPoint.Slide
Dim oShape As PowerPoint.Shape
Set oPA = New PowerPoint.Application
oPA.Visible = msoTrue
Set oPP = oPA.Presentations.Add(msoTrue)
oPP.Slides.Add 1, ppLayoutBlank
Set oPS = oPP.Slides(1)
Set oShape = oPS.Shapes.AddTextbox(msoTextOrientationHorizontal, 200#, 80#, 100#, 50#)
oShape.TextFrame.WordWrap = msoTrue
oShape.TextFrame.TextRange.Text = Worksheets("Tabelle1").Range("A2")
Set oShape = oPS.Shapes.AddTextbox(msoTextOrientationHorizontal, 300#, 80#, 100#, 50#)
oShape.TextFrame.WordWrap = msoTrue
oShape.TextFrame.TextRange.Text = Worksheets("Tabelle1").Range("A3")
Set oShape = oPS.Shapes.AddTextbox(msoTextOrientationHorizontal, 400#, 80#, 100#, 50#)
oShape.TextFrame.WordWrap = msoTrue
oShape.TextFrame.TextRange.Text = Worksheets("Tabelle1").Range("A4")
End Sub

cu
Chris
Anzeige
Vielen dank, supi :-) owT
05.05.2010 10:23:00
Joachim
;

Forumthreads zu verwandten Themen

Inhalt einer Zelle im Windows Infobereich anzeigen
Thomas

Hallo,
kann ich den Inhalt einer Zelle im Windows Infobereich anzeigen lassen?
Ich habe eine VBA-Anwendung, die mir den Verarbeitungsstatus in einer Zelle anzeigt.
Weil die Verarbeitung sehr lange dauert möchte ich zwischendurch mit anderen Anwendungen arbeiten und unten rechts nebe...
27.08.2008 17:50:23
Thread-ID: 1005163
3 Beiträge
Textinhalte aus Zellen zusammenkopieren
zehetner

Liebe Profis,
ich habe die Ergebnisse einer Befragung in ein Excel-Sheet eingegeben, jeder Befragte in ein Registerblatt. Nun möchte ich die Antworten der Befragten, die in Textfeldern (immer in den selben, zB E145 stehen) gesammelt in eine neue Tabelle bringen.
Ziel ist es, die Antwort...
21.09.2008 18:29:25
Thread-ID: 1011343
2 Beiträge
Text (Datum) aus Zeile mit Zeilenbruch auslesen
Iro

Hallo,
ih habe folgendes Problem: ich muss aus einem vorgegebenen Sheet einen bestimmten Zinssatz zu einem bestimmten (Jahr / Monat) auslesen.
1. Problem: das vorgegebene, gesuchte Datum hat das Format TT.MM.JJJJ, das andere Datum, mit dem ich es vergleichen muss wird mit "Monat Jahr"....
01.10.2008 23:00:06
Thread-ID: 1013778
4 Beiträge
Text aus einer Zelle in ein anderes Tabellenblatt
grigolet

Hallo,
ich erstelle gerade eine Arbeitsmappe in der auf verschiedenen Tabellenblättern die gleichen Namen erscheinen sollen (aus dem Blatt 'Verhandlungsergebnis' sollen die Personendaten der Beteiligten in ein erstelltes Vertragsformular übernommen werden). Ich habe das z.B. mit = gelöst. J...
09.10.2008 11:24:26
Thread-ID: 1015295
2 Beiträge
Anzeige
Inhalt einer Zelle in anderer Zelle als Formel
Elias

Guten Morgen,
ich bin auf der Suche nach einer Lösung für folgenden Sachverhalt.
In einer Tabelle wird aus dem Inhalt verschiedener Zellen über Verketten eine Zeichenfolge gebildet, die in einer anderen Tabelle als Formel herhalten soll.
(Kurzes) Beispiel, das Original ist furchtbar...
11.01.2009 06:01:22
Thread-ID: 1038572
6 Beiträge
Anzeige
Text in Fußzeile aus Zelle ziehen
Sandra

Hallo zusammen!
Ich brauche mal wieder Eure Hilfe.
Meine Exceltabelle (ein Protokoll) soll im linken Teil der Fußzeile einen Text bekommen, der automatisch aus einer Zelle gezogen wird. So das sich die Fußzeile immer aktualisiert, wenn die Zelle geändert wird. Mit einer Formel geht es j...
29.01.2009 11:29:24
Thread-ID: 1044904
23 Beiträge
Zufällig einen Text ausgeben aus best. Zellen
Eddie

Hallo und Guten Abend.... habe mal wieder ein Problem...
Ich will gerne aus einer Anzahl von zellen (ca 100 Zeilen) .. wo bestimmte Sätze drin stehen diese Zufällig in einer Bestimmten zelle anzeigen lassen ....
Vielleicht hat ja jemand schon sowas gemacht ?
thx schon einmal
G...
15.02.2009 20:14:00
Thread-ID: 1050974
7 Beiträge
Inhalt einer Zelle in mehrere Zellen aufsplitten
Joerschi

Hallo liebe Excel-Community,
ich möchte den Inhalt einer Zelle (getrennt durch Leerzeichen) in andere Zellen aufsplitten bzw. in anderen Zellen getrennt anzeigen lassen. Die Leerzeichen aus der Herkunftszelle sollen dabei ignoriert werden.
Z. B. steht in Zelle A1: "1 2 3 4 5"
Jetzt...
04.03.2009 11:46:03
Thread-ID: 1056268
9 Beiträge
Bestimmten Inhalt einer Zelle in Textbox
Mone

Hallo Ihr Experten!
Ich bin am Verzweifeln....suche nach einer Möglichkeit mit VBA aus einer Zelle (A6) einen Teil aus dieser Zelle in eine Textbox zu manövrieren. Also in A6 steht z.B. 1234 Musterstadt. Ich muss nun die PLZ in eine separate Textbox einlesen als auch den Ort. Habe da mittel...
04.03.2009 23:39:53
Thread-ID: 1056628
4 Beiträge
Zugriff auf auf Teilinhalte einer Zelle
Der

Hallo da Draußen!
Habe mal wieder ein Problem mit meiner VBA Programmierung. Ich möchte innerhalb einer Exceltabelle auf einzelne Zellen zugreifen, die ein bestimmtes Merkmal haben. Der Inhalt der Zelle beginnt mit einer Zahl (in diesem fall mit einer Postleitzahl). Ich möchte also meine Ab...
20.03.2009 14:52:09
Thread-ID: 1062230
5 Beiträge
Teilinhalte aus Zellen löschen
Der

Hallo da draußen,
ich möchte aus einer Zelle die ersten x Zeichen von links löschen und die Restlichen beibehalten. Mit dem Befehl left(cells(R,C),x) kann ich auf diese Zeichen zugreifen und sie auch auslesen. Wie kann ich sie nun löschen?
Danke für Eure Hilfe!
Grüße aus der Hauptst...
25.03.2009 15:20:24
Thread-ID: 1063841
9 Beiträge
Anzeige
'Inhalt'/Typ einer Zelle bestimmen
TommiH

Hallöchen,
gibt es eine einfache Methode bei einer Zelle zu bestimmen, ob der Inhalt eine Zahl ist oder nicht?
Ich habe eine Zelle über die ich nicht weiss was drin steht, aber wenn eine Zahl drin steht, muss diese um 1 erhöht und einer anderen Zelle zugewiesen werde. Wenn es keine Zahl...
27.03.2009 14:17:52
Thread-ID: 1064625
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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