- Anyagi katasztrófára figyelmezteti az Apple-t a brit média
- Linux - haladóknak
- Linux kezdőknek
- Hálózati / IP kamera
- A leépítések után egy vagyont költ a töltőhálózatára a Tesla
- Bocsánatot kért az Apple, mert nagyon mellélőtt a legutóbbi reklámjával
- Álláskeresés, interjú, önéletrajz
- Már nem hisz a nagy európai EV-forradalomban a Ford
- Mesterséges intelligencia topik
- Microsoft Office és Office 365 topic
-
IT café
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.
Új hozzászólás Aktív témák
-
Fferi50
őstag
Szia!
A Thisworkbook kódlapjára másold be:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Type = xlWorksheet Then Range("A1").Select
End Sub
Ez minden esetben, amikor az aktívvá válik egy munkalap, az A1 cellára viszi a kurzort.
Ne feledd, hogy makróbarát (xlsm) munkafüzetként kell menteni.Ha viszont csak egyszer szeretnéd áttenni a kurzort, akkor ezt a makrót futtasd le:
Sub allitja()
Dim sh As Worksheet, ii As Integer
Application.ScreenUpdating = False
ii = ActiveSheet.Index
For Each sh In Worksheets: sh.Activate: sh.Range("A1").Activate: Next
Sheets(ii).Activate
Application.ScreenUpdating = True
End SubVégigmegy a munkalapokon és mindenütt az A1 cellára állítja a kurzort.
Ezt beteheted egy munkalap kódlapjára, vagy egy általános modulra, majd a futtatás után törölheted a kódot tartalmazó munkalapot és mentheted makró nélkül.Üdv.
[ Szerkesztve ]
Új hozzászólás Aktív témák
- Milyen légkondit a lakásba?
- Futás, futópályák
- Kerékpárosok, bringások ide!
- Formula-1
- Milyen processzort vegyek?
- Mikrokontrollerek Arduino környezetben (programozás, építés, tippek)
- Milyen autót vegyek?
- Lakáshitel, lakásvásárlás
- World of Tanks - MMO
- bb0t: Gyilkos szénhidrátok, avagy hogyan fogytam önsanyargatás nélkül 16 kg-ot
- További aktív témák...
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Promenade Publishing House Kft.
Város: Budapest