Office: (Office 2013) POP UP Fenster

Hallo
ist es möglich eine Art Pop Up Fenster aufgehen zu lassen?
Ich habe E1 bis AP1 Geburtsdaten. Ich möchte eine Info wenn ich Excel starte wenn der Geburtstag mit dem heutigen Datum übereinstimmt.

Ich nutze Excel 2013 und kann keine AD INS installieren.

:)

 

Mit VBA ist dies möglich.

Ich würde aber eher ein Tabellenblatt realisieren, das die Geburtstage der letzten z.B. 5 Tage bis zu den nächsten bspw. 10 Tagen anzeigt. Denn dann bekommst du auch die Geburtstage mit, die bspw. während der freien Tage um Ostern waren.

 

Hi,

hier der Link zu dem Beispiel Geburtstage anzeigen von meiner HP, Seite Beispiele m. VBA, wie man es lösen könnte - musst du halt nur an deine Bedingungen anpassen.

 

Danke euch beiden.
@WS-53: da kann man sicher in dem POP UP auch die lezten 5 mit anzeigen lassen?

 

Das habe ich leider nicht hinbekommen.
Kann jemand bitte so ein VBA für mich erstellen, dass ich diese nur einfügen muss?

 

die VBA Lösung von Berverly hat Dir also nicht gefallen?

Zu Deiner Datei kann ich nichts schreiben, was wohl daran liegt das ich nicht auf fremde Rechner schaue. Ich baue keine Datei nach.

Sollte die Datei verlinkt werden?

Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Muster*, Test*, Mappe*, Beispiel*, Fehler*, Kalender*, UserForm* usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.

Bilder lade ich mir nicht runter, da Excel damit nichts anfangen kann.

Hochgeladene Bilder können zwar als solche in Excel importiert werden, sind jedoch bei der Lösung von Problemen nicht sehr hilfreich, da man die eigentlichen Daten nicht ohne große und zeitraubende Umwege direkt in die Tabelle übertragen kann.

Bilder statt Datei | Excel ist sexy!

Es sollte ein aussagekräftiger Name sein.

Das ist nur meine Meinung zu dem Thema.

Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten
http://www.ms-office-forum.de/forum/...d.php?t=322895
ändern.

Das ist nur meine Meinung zu dem Thema.

 

Die VBA Lösung von Beverly konnte ich bei mir nicht anwenden.

Namen werde ich nächstes mal besser wählen.

Mappe anonymisieren werde ich sicher mal nutzen. Danke für den Tipp.

Ich habe eine Beispielmappe im Anhang. Ist nicht viel drin. Wie schon Beschrieben die Geburtstage stehen oben.

Gut wäre eine VBA welche den aktuellen Geburtstag und die 5 letzten als POP UP anzeigt.

 

ich bin dann raus, da meine Beiträge nicht komplett gelesen werden.
Das wird schon seinen Grund haben.
Ich schreibe nicht für den Papierkorn. Ich bin dann raus.
Viel Erfolg noch.

 

Ach du meinst den Namen der Datei. Ich dachte für den Titel im Forum. Habe es geändert.

 

Für eine Lösung ist es nicht ganz unwichtig zu wissen, wie denn die Geburtstage in deiner Tabelle geplegt sein.

Sofern du bei der Erfassung nur Tag und Monat eingegeben hast, dann wird als Jahr immer das aktuelle genommen. Es könnte aber auch sein, dass du im Textformat nur Tag und Monat, getrennt durch einen Punkt, erfasst hast.

Das erzeugen einer MsgBox, wenn die Mappe geöffnet wird ist das geringste Problem. Es könnte aber nervig werden, wenn du die Mappe mehrmals am Tag öffnest, dass dann jedesmal die Geburtstage angezeigt werden.

Wobei wenn diese mehrfach geöffnet wird ohne anschliessend Änderungen zu speichern, dann wird es schwieriger, die Geburtstagsinfo nur einmal pro Tag zu zeigen.

 

Folgenden Code ins Codemodul DieseArbeitsmappe:

Code:

 

\@WS-53: Ich habe wie in der Beispieldatei die Geburtstage TT.MM.JJJJ angegeben.
Das mit dem mehrfach anzeigen ist ein guter Gedanke. Würde aber nicht stören.

@Beverly: Es erscheint nun ein Popup Fenster. Darin steht: Index außerhalb des Gültigen Bereichs.
Wahrscheinlich macht es einen Unterschied weil ich die Geburtstagsdaten dort nicht manuell eintrage, sondern mit einer Sverweis Formel erscheinen lasse?

 

Hi,

dieser Fehler besagt, dass das angesprochene Element nicht vorhanden ist. Es ist also davon auszugehen, dass das Tabellenblatt, in dem deine Daten vorliegen, nicht "Tabelle1" heißt. Als Helfer muss man immer davon ausgehen, dass das Original genau so aussieht wie das hochgeladene Beispiel - wenn dem nicht so ist, muss der Fragesteller solche Dinge logischerweise selbst anpassen.

 

Okay habe es. Vielen Dank an alle!

 

Hier eine Lösung, wie es mir gefallen würde.

In der Tabelle "Namen" sind die Geburtstage enthalten in Spalte D wird berechnet, in wie vielen Tagen der nächste Geburtstag ist.

Im Tabellenblatt "Anstehende Geburtstage" wird, ausgehend von Heute(), der Zeitraum definiert, der für die MsgBox berücksichtigt werden soll. In C7 wird dann der Text für die MsgBox vollständig aufbereitet, wobei bereits vergangene von den anstehenden Geburtstagen durch eine Leerzeile getrennt werden.

Die Basis für die MsgBox is die Tabelle darunter, in der ausgehend Vom Startdatum des Zeitraums, die Geburtstagsliste aufsteigend gezeigt werden.

Bei Workbook_Open wird dann die bereits aufbereitete Message gesendet, wenn die Anzahl der relevanten Geburtstage > 0 ist.

Wenn ich geübter in VBA wäre, dann hätte ich natürlich die Liste der anstehenden Geburtstage und den Text für die MsgBox, komplett in VBA realisiert.