Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ - Kalendarz wyskakujący z komórki

MJM · Świeżak Wersja: Win Office 2013 Posty: 4

Cześć Wszystkim : ),

chciałem zrobić możliwość wyboru daty w komórce z "wyskakującego" kalendarza jednak pomimo obejrzenia kilku filmów na YT nie wiem jak to zrobić : (,
Czy na forum jest osoba która by mi pomogła bez płatnie lub płatnie to wykonać?

Pozdrawiam Wszystkich

umiejead · Wysłany: 20-02-2021, 15:52

Witamy na Forum.

http://www.excelforum.pl/...light=kalendarz

MJM · Świeżak Wersja: Win Office 2013 Posty: 4

Dziękuje za podpowiedź,

niestety ja nie jestem wstanie sam tego zrobić,
Czy orientujecie się czy ktoś na forum może wykonać to za kaskę : )

Pozdrawiam

Tadek · Wysłany: 23-02-2021, 07:56

Zobacz w załączniku.

Kalendarz do aktwnej komorki.xlsm

Pobierz Plik ściągnięto 16 raz(y) 31.65 KB

MJM · Świeżak Wersja: Win Office 2013 Posty: 4

@Tadek bardzo dziękuje za pomoc, nie chciałbym naruszać twojej uprzejmości ale jak zrobić aby kalendarzy wyskakiwał również w innych kolumnach? potrzebuję w 4 kolumnach. na B,D,F,H.
w jaki sposób bym nie kopiował przenosił itd formuła przestaje działać.
jeszcze raz dzięki :-D

Maciej Gonet · Wysłany: 23-02-2021, 14:21

W kodzie arkusza masz kod obsługi zdarzenia SelectionChange:

Kod:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("B1:B20")) Is Nothing And Target.Count = 1 Then
frmKalendarz.Show
End If
End Sub

W tym kodzie jest zapisany zakres komórek B1:B20, w którym kod jest aktywny.
Dopisz sobie do tego inne zakresy jakie są Ci potrzebne, tworząc zakres złożony, np.

Kod:

Range("B1:B20,D1:D20,F1:F20,H1:H20")

MJM · Świeżak Wersja: Win Office 2013 Posty: 4

@Maciej Gonet wielkie dzięki, dostosowałem plik do swoich potrzeb :-)