Posts

Es werden Posts vom April, 2014 angezeigt.

Geschlossene Dateien - Range in Masterdatei in Zeilen auslesen...

Frage: Bestimmte Daten (B2:C2, B3:C3, B4:C4) aus über 200 Exceldateien in eine Masterdatei in A2 abwärts. Der Dateiname in Spalte A, der Rest in die Spalten B:G. Wie geht das?

Certain data (B2:C2, B3:C3, B4:C4) from over 200 Excel files into a master file in A2 down. The file name in column A and the rest in columns B:G. How does it work?

Hier noch eine Beispieldatei / Here's a sample file:
Geschlossene Dateien - Range in Masterdatei in Zeilen auslesen...[ZIP 300 KB]

' Variablendeklaration erforderlichOptionExplicit' Der Tabellenblattname in den auszulesenden DateienConststrSheetQAsString="Tabelle1"' Der Tabellenblattname in DIESER Datei (die mit dem Code)ConststrSheetZAsString="Total"' Dieser Bereich wird ausgelesenConststrRange1AsString="B2:C2"ConststrRange2AsString="B3:C3"ConststrRange3AsString="B4:C4"'--------------------------------------------------------------------------' Module : Modul1' Proced…

Outlook - neueste Mail mit bestimmtem Betreff - Informationen ausgeben...

Frage: Im Ordner Posteingang sind mehrere Mails mit dem gleichen Betreff. Von diesen Mails benötige ich die Neueste. Im folgenden Beispiel wird die Mailadresse und der Name des Absenders angezeigt. Zusätzlich noch die Empfangszeit der Mail.

In the Inbox folder are several emails with the same subject. Of these mails I need the latest. In the following example, the email address and the name of the sender is displayed. In addition the time of receipt of mail.

Hier noch eine Beispieldatei / Here's a sample file:
Outlook - neueste Mail mit bestimmtem Betreff - Informationen ausgeben...[XLS 50 KB]

OptionExplicit' Variable um bei schon geöffnetem Outlook dieses nicht zu schliessenDimblnTMPAsBoolean'--------------------------------------------------------------------------' Module : Module1' Procedure : Main' Author : Case (Ralf Stolzenburg)' Date : 09.04.2014' Purpose : Outlook Subject mehrere gleiche neueste Infos ausgeben...'----------------…