-
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
-
lapa
veterán
válasz
kraftxld
#1241
üzenetére
egy ilyet csináltam proof-of-concept gyanánt:
sheet1 kódja:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Range(Cells(Target.Row, 2), Cells(Target.Row, 3)).Copy
Cancel = True
End Sub
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
ActiveSheet.Paste Destination:=Range(Cells(Target.Row, 1), Cells(Target.Row, 2))
Cancel = True
End Sub
ez duplakattra másol, jobbkattra beilleszt. persze így mind a duplakatt, mind a jobbklikk csak erre használható. egyelőre nem tudtam elérni, hogy valami módon ellenőrizze a vágolap tartalmát, így egy eventbe sem tudtam belezsúfolni. ha valaki ki tudja így egészíteni, kíváncsi lennék rá... -
matekmatika
tag
válasz
kraftxld
#1241
üzenetére
''User kattint egy sorra (forrássor) kattint egy gombra ami futtatja a makrót''
Ez idáig ok, de
''kattint egy sorra (célsor) majd átmásolja a makró a forrássor B oszlopában lévő elemet a célsor A oszlopába''
Egy makro futása közben nem hiszem, hogy engedne az bárhová is kattogtatni. Max egy inputablakba be lehetne kérni, hogy melyik sorba akarod beilleszteni.
Vagy kellene még egy parancsgomb amely a beillesztést végző makrot indítaná az aktívvá tett cella alapján.
Viszont mindkettő megoldásnál gyorsabb szerintem a jobb klikk másolás - jobb klikk beillesztés variáció.
Új hozzászólás Aktív témák
- Házimozi belépő szinten
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- Milyen házat vegyek?
- Milyen hagyományos (nem okos-) telefont vegyek?
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- LEGO klub
- Napelem
- Delta Force (2024)
- Autós kamerák
- Magga: PLEX: multimédia az egész lakásban
- További aktív témák...
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Apple iPhone 7 32GB fekete független
- LG 45GX950A-B - 45" Ívelt OLED evo / 5K WUHD / 165Hz-330Hz / NVIDIA G-Sync / FreeSync / DP 2.1
- GYÖNYÖRŰ iPhone 12 Pro 256GB Pacific Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS4155,100% Akksi
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- HP Thunderbolt 4 kábel
Állásajánlatok
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Fferi50
