No tak jak napisał KwasneJablko spróbuj "If CloseMode = 0 Then Selection.Clear" lub zamiast Clear uzyj ClearContents jeśli masz tam jakieś formatowanie tej komórki, którego nie chcesz stracić. Przy czym to trochę niebezpieczne jesli miałbyś formularz niemodalny, bo możesz przypadkowo usunąć sobie już wprowadzone datę

@SuperGosc11: najlepsza nauka jest praktyka, spróbuj wymyślić sobie jakiś problem (bądź jak pracujesz wymyśl sobie coś co teraz robisz manualnie a teoretycznie dałoby się zastąpić algorytmem) i zacznij go rozwiązywać. Z mojego doświadczenia to najlepsza nauka

@SuperGosc11: valkenbach

@vateras131: Dodaj w środku klauzuli With:

.PropertyAccessor.SetProperty "[http://schemas.microsoft.com/mapi/proptag/0x6E010003",](http://schemas.microsoft.com/mapi/proptag/0x6E010003",) 0

@vateras131: Warto też dodać skróty do opcji szyfrowania i podpisu cyfrowego na pasku "szybki dostęp" w oknie wiadomości, jeżeli często z nich korzystasz.

@niepewyjutra z czego się uczyłeś?

@Netrunner ok, powodzenia. Mam dostępny tylko telefon przy sobie ale jak mój syn będzie odpoczywał to mogę pomyśleć jak co pomoc. Jak ci nie wyjdzie daj znać.

@lufi: good luck :) wez sobie zaloz jakis problem zyciowy i krok po kkroku dochodz do tego jak go rozwiazac.

np. chcesz skopiowac co druga komorke do drugiego sheeta to wpisuesz w google na poczatku "vba copy cells to other sheet". jak juz to ogarniesz to wpisujesz w google "vba copy cells to other sheet loop", "vba for loop"

i tak dalej i tak dalej. step by step, error andPokaż całość

@lufi: wszystko czego potrzebujesz żeby zacząć

@KwasneJablko: daj na oko każdemu 1->2->3->4->5 tylko niech Agent1 zaczyna od 1 shift, 2 od 2 itp ;p a w kolejnym tygodniu przesunięcie o 1 xd chyba że robisz sztukę dla sztuki

@plaquo: biblia wilkenbacha i masz tam wszystko

@plaquo

Sprawdź kanał WiseOwl na YouTube. Ma playliste z ponad 70 lekcjami w VBA ułożonymi od zera do "bohatera"

@ATLETICO: Tylko SHA-1. https://en.wikipedia.org/wiki/Secure_Hash_Algorithms
Jedyną znaną metodą na łamanie hashy SHA-512 jest bruteforce.

@SzejsiontGroszy: Wynik formuły też będziesz miał widoczny w jakieś komórce, no ale skoro chcesz komunikat... W makrze musisz jasno zdefiniować, jakie przedziały Cię interesują oraz od jakiej daty je liczyć. Jeżeli będziesz miał 10 promocji i każda będzie się kończyła innego dnia, to co wtedy? Skąd makro ma wiedzieć, że dziś akurat interesuje Cię np. 7?

@Anarchia96: Powodzenia :)

@jtomek1: Ja kiedyś używałem czegoś takiego do aplikacji javowej - makro aktywowało jej okno (po nazwie na pasku), następnie dla pewności kopiowało zawartość bieżącego pola i sprawdzało, czy było to "nie" - jeśli tak (w sensie to "nie" ;), to operując tabulatorami przechodziło do kolejnych pól i wklejało odpowiedni tekst, w przeciwnym wypadku "tabowało" do kolejnego pola i znów sprawdzało zawartość. Jest to oczywiście metoda bardzo podatna na błędy, alePokaż całość

@jtomek1:
https://www.dataload.com/
Wersja classic jest darmowa i nie wymaga instalacji. Zobacz czy spełnia oczekiwania.

@pwn3r: Jeżeli masz zdefiniowany jeden wiersz w zakresie, metoda FillDown używa wiersza poprzedzającego (w Twoim przypadku czwartego) jako źródła. Użyj [c5:d7].FillDown.

@s_inai: albo po prostu zadaj konkretne pytania, może się akurat komuś będzie nudziło ¯\_(ツ)_/¯

@michal0110: A rulą tego nie załatwisz że do makra sięgasz?

@halogen12v:

Private Sub ListBox1_Change()

With ListBox1
klientPokaż całość

@halogen12v:

With ListBox1
lista = Application.Index(.List, .ListIndex + 1)
EndPokaż całość

@Makiner: Sub Przygotuj()
Dim sh As Worksheet

On Error Resume Next
Set sh = Sheets("Arkusz1")
On ErrorPokaż całość

@Makiner: spróbuj w edytorze Tools->options->editor format i zmień czcionkę na courier new (europa środkowa).

Jak to nie zadziała to można jeszcze pobawić się z funkcją chr()