-
Fototrend
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
-
Cufter
tag
válasz
Delila_1
#12874
üzenetére
Közben sikerült ennyit összeszedni:
Sub masol()
Sheets("Számolás").Range("F2
9").Copy
Sheets("Cégek").Activate
Range("a65536").End(xlUp).Offset(1, 0).Activate
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
True, Transpose:=False
Application.CutCopyMode = False
Sheets("Számolás").Activate
Range("a1").Select
End SubEz már a fix cellákat és az értékeket másolja, így az megoldva.
Már csak tényleg az hiányzik, hogy az értékeket(4db cella) ne egymás alá tegye, hanem egymás mellé. Aztán a következő futásnál már új sort töltsön fel újra egymás mellé téve a cellákat.
-
Cufter
tag
válasz
Delila_1
#12872
üzenetére
Köszi, kiindulásnak nem rossz.
Két fontos és egy kényelmi változtatás kellene még:1: A cella képlettel számított értékeket tartalmaz, így ezeket kellene átvigye, ne a hivatkozást.
2: Egymás alá helyett egymás mellé kellene tegye a másolandó cellákat, de egymás alatti sorba minden új rögzítésnél.
Kényelmi: Kijelölés helyett fix cellákat kellen másoljon.Köszi
-
Cufter
tag
Sziasztok!
Szükségem lenne egy olyan makrora?, vagy excell parancsra?, mely adott cellák értékét egy gomb megnyomására a másik lapra egymás melletti cellálkba másolja mindig a következő új sorba, tehát a lista lefelé bővüljön, minden egyes adatbevitel gomb megnyomására.
Köszönöm előre is segítségetek!
Új hozzászólás Aktív témák
- Hálózati / IP kamera
- Mibe tegyem a megtakarításaimat?
- Call of Duty: Black Ops 7
- Napelem
- Intel Core i5 / i7 / i9 "Alder Lake-Raptor Lake/Refresh" (LGA1700)
- Philips LCD és LED TV-k
- Gitáros topic
- Kínai és egyéb olcsó órák topikja
- Villanyszerelés
- Európába tart a Xiaomi Watch 5, eSIM-es verzió is jöhet
- További aktív témák...
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- 212 - Lenovo IdeaPad Slim 5 (16IMH9) - Intel Core U5 125H, no GPU
- ÓRIÁSI BOMBA AKCIÓK! PSN, STEAM, UBISOFT CONNECT, EA APP, XBOX EREDETI KULCSOK 100% GARANCIA
- Akció!!! Microsoft Surface Laptop 4 13.5" i7-1185G7 16GB 512GB 1 év garancia
- Geforce GTX 1050, 1050 Ti, 1060, 1650, 1660 - GT 1030 - Low profile is (LP)
- Creative Sound BlasterX G6 7.1 USB külső hangkártya
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

9").Copy
Fferi50