Hirdetés
- Samsung Galaxy Watch4 és Watch4 Classic - próbawearzió
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Android szakmai topik
- OneSport OT07 - szevasztok, hollandok!
- Samsung Galaxy A70 - áram, erősség
- MIUI / HyperOS topik
- Milyen okostelefont vegyek?
- Stabil pályára állt az Android 16
- Redmi Note 11 és 11S - biztos alapra jobb építeni
-
Mobilarena
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
-
Delila_1
veterán
válasz
ztoldy #38305 üzenetére
A
Range("D" & sor & ":E" & sor).MergeCells = True
sor fölé írd be:
Cells(sor, "D") = Cells(sor, "D") & " " & Cells(sor, "E")
Ha az összefűzés után nincs szükséged az E oszlop tartalmára, akkor
Sub Osszevonas()
Dim sor As Long
Application.DisplayAlerts = False
Application.ScreenUpdating = False
sor = 2
Do While Cells(sor, "D") <> ""
Cells(sor, "D") = Cells(sor, "D") & " " & Cells(sor, "E")
Cells(sor, "E") = ""
sor = sor + 1
Loop
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
Új hozzászólás Aktív témák
- Apple iPhone 13 Mini 128GB, Kártyafüggetlen, 1 Év Garanciával
- LG 40WP95XP-W - 40" NANO IPS - 5120x2160 5K - 72Hz 5ms - TB 4.0 - HDR - AMD FreeSync
- Xiaomi Redmi 7 32GB, Kártyafüggetlen, 1 Év Garanciával
- Telefon felvásárlás!! iPhone 16/iPhone 16 Plus/iPhone 16 Pro/iPhone 16 Pro Max
- Csere-Beszámítás! RTX Számítógép játékra! R5 5500 / RTX 3060Ti / 32GB DDR4 / 500GB SSD
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest