Posts

Es werden Posts vom Februar, 2013 angezeigt.

PowerPoint - Bilder nach Excel holen - the next level...

Frage: Zu dem Thema "Bilder aus PowerPoint nach Excel" gab es verschiedene Nachfragen. Die Bilder werden nicht permanent gespeichert. Ein Problem aus Excel 2010. Im Netz gibt es verschiedene Lösungen. Ich lade die Bilder in ein ActiveX Steuerelement (Image). Die Verzeichnisauswahl (temporäre Bilder) habe ich geändert. PowerPoint soll minimiert werden. Läuft nicht unter PowerPoint 2003. Codezeile löschen oder kommentieren. Getestet in Excel 2007 und 2010. Für andere Versionen muss gegebenenfalls angepasst werden.

On the topic of "images from PowerPoint to Excel" there were different demands. The images are not stored permanently. A problem of Excel 2010. On the web there are various solutions. I load the images in an ActiveX control (Image). The directory selection (temporary images) I have changed. PowerPoint should be minimized. Does not work in PowerPoint 2003. Line of code to delete or comment. Tested in Excel 2007 and 2010. For other versions may need to be adj…

Summe - Tabellenblätter - Zelle - Zellen...

Frage: Für jeden Tag eines Jahres gibt es ein Tabellenblatt. Zusätzlich noch ein Summentabellenblatt. In diesem möchte ich die Summe von einer oder zwei Zellen aus allen Tabellenblättern. Die Tabellenblätter haben das Datum als Namen. Deshalb möchte ich auch über die Eingabe eines Start- bzw. Enddatums die Summe dieser beiden Zellen wissen. Ein Tabellenblatt für jeden Tag des Jahres erstellen - siehe "http://vbanet.blogspot.de/2012/10/ein-tabellenblatt-fur-jeden-tag-des.html".

For each day of the year, there is a worksheet. Additionally a total spreadsheet. In this I would like the sum of one or two cells from all worksheets. The spreadsheets have the date as the name. So I want to know by entering a start and end date, the sum of these two cells. A worksheet for each day of the year to create - see "http://vbanet.blogspot.de/2012/10/ein-tabellenblatt-fur-jeden-tag-des.html".

Hier noch eine Beispieldatei / Here's a sample file:
Summe - Tabellenblätter - Zelle - …

UserForm, ComboBox, TextBox - variabel ansprechen...

Frage: Userformen, ComboBoxen und Textboxen variabel ansprechen. Ich habe mehrere UserFormen. Auf Grund von Usereingaben muss eine bestimmte UserForm geöffnet werden. Eine TextBox soll schon einen bestimmten Text enthalten. Eine ComboBox einen bestimmten Wert anzeigen. Wie geht das?

User forms, combo boxes and text boxes respond variably. I have several user forms. Based on user input, a certain UserForm to open. A TextBox is already contain specific text. A ComboBox show a certain value. How does it work?

Hier noch eine Beispieldatei / Here's a sample file:
UserForm, ComboBox, TextBox variabel ansprechen...[XLS 60 KB]

OptionExplicit'-------------------------------------------------------------------------- ' Module : Module1 ' Procedure : Main ' Author : Case (Ralf Stolzenburg) ' Date : 22.02.2013 ' Purpose : UserForms and TextBoxes to address variable... '-------------------------------------------------------------------------- PublicSub M…

PowerPoint - Bilder nach Excel holen...

Frage: Eine Powerpointdatei enthält einige Bilder. Diese Bilder brauche ich in Excel. Wie geht das?
Info: Funktioniert nicht mit PowerPoint 2013 (im Moment). Speichern als HTML ist dort wohl nicht vorgesehen.

A PowerPoint file contains a few pictures. These pictures I need in Excel. How does it work?
Info: Does not work with PowerPoint 2013 (at the moment). Save as HTML is not well provided there.

Link: PP 2010 and Save as HTML...

Achtung! / Attention! PowerPoint - Bilder nach Excel holen - the next level...

Hier noch eine Beispieldatei / Here's a sample file:
PowerPoint - Bilder nach Excel holen...[ZIP 450 KB]

OptionExplicitPrivateDeclareFunction PathFileExists Lib"shlwapi.dll" _ Alias"PathFileExistsA" (ByVal pszPath AsString) AsLongPrivateDeclareFunction MakeSureDirectoryPathExists _ Lib"imagehlp.dll" (ByVal Pfad AsString) AsLong' TEMP Pfad - muss in der Regel nicht angepasst werden Const strPath AsString = "C:\PicTMP"' Konst…

Outlook - Entwürfe - Mails...

Bild
Frage: In Outlook im Ordner Entwürfe liegen einige Mails. Diese werden vor dem verschicken noch bearbeitet. Z. B. sollen Anhänge hinzugefügt werden. Das Beispiel unten funktioniert natürlich nur, wenn auch Mails im Ordner Entwürfe vorhanden sind!

In Outlook Drafts folder are some mails. These are still being processed before sending. E.G. attachments should be added. The example below only works if there are messages in the Drafts folder!

Hier noch eine Beispieldatei / Here's a sample file:
Outlook - Entwürfe - Mails...[XLS 40 KB]

OptionExplicitDim blnTMP AsBoolean'-------------------------------------------------------------------------- ' Module : Module1 ' Procedure : Main ' Author : Case (Ralf Stolzenburg) ' Date : 05.02.2013 ' Purpose : Outlook Entwürfe auf Mails zugreifen... '-------------------------------------------------------------------------- PublicSub Main() Dim objNameSpace AsObjectDim objFolder AsObjectDim objItem AsObject…