2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
Keresés
  • Téma összefoglaló
    Utoljára frissítve: 2023-11-13 08:31

    IT café

    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

  • #35880 Delila_1 Topikgazda föccer #35879
    Új Válasz #35880
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    Privát üzenet küldése

    Delila_1

    Topikgazda

    válasz föccer #35879 üzenetére

    Rossz hírem van. A másolandó tartománynak először a formátumát másolom a másik lapra, hogy azonosak legyenek a cellaegyesítések. Ennek ellenére az azonos formátumú másolandó területet nem képes az Excel beilleszteni. A lenti makróban kihagyhatod a csillagokkal jelzett sort, mert ott megbukik. Meg kell szüntetned az egyesítéseket, akkor jó lesz.

    Sub Masolas()
    Dim sor As Long
    If Sheets(2).Range("A5") = "" Then
    sor = 5
    Else
    sor = Sheets(2).Range("A" & Rows.Count).End(xlUp).Row + 2
    End If

    Sheets(1).Range("AD18:AD21").Copy
    Sheets(2).Range("A" & sor).PasteSpecial xlPasteFormats '***
    Sheets(2).Range("A" & sor).PasteSpecial xlPasteValues
    End Sub

    Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.

Új hozzászólás Aktív témák