Hirdetés
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- Graphics: Telefonvásárlási kálváriám....avagy clickbait cím: Horror a hardveraprón
- sziku69: Szólánc.
- Gurulunk, WAZE?!
- Hieronymus: Pihole + Unbound
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- hcl: Olympus E-PL1 nyomozás
- Elektromos rásegítésű kerékpárok
- Hieronymus: A jövő számítógépei (Reloaded)
-
LOGOUT
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
-
tzetko
csendes tag
Szia delila
Segítséget szeretnék tőled kérni.
A fügvényvarázslóban hogyan kell leíró szöveget készíteni -
tzetko
csendes tag
Szia Delila!
A segítségedet szeretném kérni.
Az Excelben makroval ki akarom kapcsolni az automatikus helyreálítást. Auto openbe be akarom rakni, ha megnyitom az Excelt akkor a korábbi (bal oldalt lévő) helyre állított fájlokat automatikusa törölje.Köszönöm a segítséged!
-
tzetko
csendes tag
Szia Delila!
lehet hogy nem olvastad a tegnap esti kérésemet.
nem szeretnék tolakodó lenni, pusztán kérdezem tudsz-e még segíteni nekem?
fentebb láthatod a kérésemet.Köszi.
-
tzetko
csendes tag
Szia Delila!
A múltkor kaptam tőled segítséget "mentés makróval"
Munka1 lapon 3 oszlop kitöltése után automatikusan másol a Munka2 nevű lapra és a mentéseket soronként hozzáadja a Munka2 nevű lapon.
A makró jól működik, de volna egy kérésem amit változtatni kellene rajta.
A copy-zás helyett csak értékbeillesztést kellene végrehajtania a Munka1 -ről a Munka2 lapra.
makrófelvétellel nem boldogulok.
Amit múltkor írtál:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Dim usor As Long
usor = Sheets("Munka2").Range("A50000").End(xlUp).Row + 1
Rows(Target.Row).Copy Sheets("Munka2").Cells(usor, 1)
End If
End Subeddig amit próbálgattam, de nem működik:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
Dim usor As Long
Selection.Copy
Sheets("Munka2").Select
usor = Sheets("Munka2").Range("A50000").End(xlUp).Row + 1
Rows(Target.Row).Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=FalseEnd If
End SubSegítségedet előre is köszönöm.
-
tzetko
csendes tag
Sziasztok!
Makróval szeretném megoldani, hogy van két excel munkalapom. Az egyikbe (Munka1) lapba írok pár sort, amelyet a másikba (Munka2)-be szeretnék menteni, úgy hogy mindig hozzáadja a (Munka2) lapon lévő mentettekhez.
Makró rögzítéssel nem tudom megoldani
leírná valaki nekem makróban a megoldást.Köszönöm
Új hozzászólás Aktív témák
Hirdetés
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- HP. Laptop. i5. Model: 15-da1002nq
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- Microsoft Office 2024 Home Business dobozos
- Thermal Grizzly Aeronaut paszta 3,9g /BONTATLAN/Több darab/Számlával!
- BESZÁMÍTÁS! Gigabyte G27F 27 FHD IPS 144Hz Gaming monitor garanciával hibátlan működéssel
- Samsung Galaxy S21FE / 6/128GB / Kártyafüggetlen / 12Hó Garancia
- Dell Precision 7560,15.6" FHD,i7-11850H,32GB DDR4,512GB SSD,RTX A3000 6GB VGA,WIN11
- Telefon Felvásárlás!! iPhone 14/iPhone 14 Plus/iPhone 14 Pro/iPhone 14 Pro Max
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

Fferi50