A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Gyorskeresés
Legfrissebb anyagok
- Bemutató Spyra: akkus, nagynyomású, automata vízipuska
- Bemutató Route 66 Chicagotól Los Angelesig 2. rész
- Helyszíni riport Alfa Giulia Q-val a Balaton Park Circiut-en
- Bemutató A használt VGA piac kincsei - Július I
- Bemutató Bakancslista: Route 66 Chicagotól Los Angelesig
Általános témák
LOGOUT.hu témák
- [Re:] [gban:] Ingyen kellene, de tegnapra
- [Re:] [Szevam:] Érzelmi magabiztosság/biztonság - miért megyünk sokan külföldre valójában?
- [Re:] [bambano:] Bambanő háza tája
- [Re:] Elektromos rásegítésű kerékpárok
- [Re:] eBay-es kütyük kis pénzért
- [Re:] [Tüzi:] Geek-hatarozo
- [Re:] [D1Rect:] Nagy "hülyétkapokazapróktól" topik
- [Re:] [Luck Dragon:] Asszociációs játék. :)
- [Re:] [sziku69:] Szólánc.
- [Re:] Gurulunk, WAZE?!
Szakmai témák
PROHARDVER! témák
Mobilarena témák
IT café témák
Téma összefoglaló
- Utoljára frissítve: 2023-11-13 08:31:56
LOGOUT.hu
Hozzászólások
lapa
veterán
oké asszem összeraktam. ha jól sejtem vmi adatlekérdezéssel dolgozol. nem csináltam ilyet, de feltételezem megeszi ha frissítéskor adat változik.
1. tábla kinyit
2. alt+f11
3. baloldalt this workbook duplaklikk --> jobboldalt fehér
4. ezt bepastel:
Private Sub Workbook_SheetChange(ByVal ActiveSheet As Object, _
ByVal Source As Range)
'A oszlop utolsó feltöltött sorára ugrik
Cells(1, 1).End(xlDown).Select
'ha nem mindenoké akkor jelez mint az őrkutya
If ActiveCell.Value <> ''mindenoké'' Then
MsgBox ''hoppá bibi van.'', vbOKOnly + vbCritical, ''hiba''
Else
End If
End Sub
5. tesztel
ez ráugrik a tábla aktív fülében az A oszlop utolsó feltöltött cellájára (gondolom egymás alá mennek a dolgok), és ha nem ''mindenoké'' van beírva szól. a fenti cucc a tábla minden változásánál lefut.