Legfrissebb anyagok
- Ismét egy "Idióta" A.I. Projekt, hogy meglovagolja az aktuális trendeket...
- Időutazás floppyval: A 486-os visszavág PCem-men
- AMD Ryzen 9 9900X (100-100000662WOF)+ Samsung 990 PRO 2TB MZ-V9P2T0BW
- Processzor és videokártya szilícium mag fotók újratöltve!
- Az e-sport napistenének ajándéka: Lamzu Inca gamer egér
LOGOUT témák
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- Okos Otthon kezdőknek
- Vízügy: árvíz, belvíz, aszály, stb.
- Magga: PLEX: multimédia az egész lakásban
- Mr.Csizmás: Bestbuy travel, utazós, kirándulós topic - szállások, jegyek
- leslieke: leslieke farmerzsebe
- laskr99: Processzor és videokártya szilícium mag fotók újratöltve!
- gban: Ingyen kellene, de tegnapra
- No Voice in the Galaxy
PROHARDVER! témák
Mobilarena témák
IT café témák
Új hozzászólás Aktív témák
-
öcsi-bácsi
csendes tag
válasz
öcsi-bácsi #1490 üzenetére
megtaláltam:
Sub rög4()
'minta védelem feloldására
Sheets("Munka2").Select
'azért kell először feloldani a védelmet, mert a kijelölés munka1!a1 megszűnik
pass = "123456789"
ActiveSheet.Unprotect pass
'most lehet másolni!
Sheets("munka1").Select
Range("a1").Select
Selection.Copy
Sheets("Munka2").Select
Range("A1").Select
ActiveSheet.Paste
'majd rátenni a védelmet!
ActiveSheet.Protect Password:=pass
Sheets("munka1").Select
End Sub
Új hozzászólás Aktív témák
Aktív témák
- exHWSW - Értünk mindenhez IS
- AliExpress tapasztalatok
- Elektromos autók - motorok
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- Jogász topic
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Köredzésen járt az Exynos 1680
- Minden a BlackBerry telefonokról és rendszerről
- Digitális Állampolgárság Program DÁP
- További aktív témák...
Új fizetett hirdetések
Üzleti előfizetők hirdetései
- AKCIÓ! ASUS H81M-PLUS H81 chipset alaplap garanciával hibátlan működéssel
- Bomba ár! Lenovo ThinkPad T440P - i5-4GEN I 8GB I 128GB SSD I 14" HD+ I Cam I W10 I Gari!
- Microsoft Surface Pro 9 i5-1245U 16GB 256GB 1év garancia
- Bomba ár! Dell Latitude 5401 - i5-9400H I 8GB I 256SSD I 14" FHD I HDMI I Cam I W11 I Gari!
- Bomba ár! Lenovo ThinkPad X260 - i5-6G I 8GB I 256GB SSD I 12,5" HD I HDMI I CAM I W10 I Gari!
Állásajánlatok
Cég: FOTC
Város: Budapest