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

    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

  • earth earth csendes tag
    #20820
    Új Válasz
    Ú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
    earth
    earth
    csendes tag

    Sziasztok.
    Azt tudja valaki hogyan változtassam meg ezt a program részletet hogy mindent (formátum, aláhúzások stb.) másoljon át az egyik lapról a másikra csak a képleteket ne. Gondolom a .PasteSpecial xlPasteValues ezt kellene megváltoztatni de nem tudom milyen parancsra.

    Program részlet:

    Private Sub Végrehajtás_Click()
    Dim row_main As Integer, row_sec As Integer
    Sheets("proba").Range("A10:Q1000").ClearContents
    Sheets("számítás").Select
    row_sec = 10

    For row_main = 10 To 200
    If Cells(row_main, 12).Value >= 1 Then
    Range("A" & row_main & ":R" & row_main).Copy
    Worksheets("proba").Range("A" & row_sec).PasteSpecial xlPasteValues
    row_sec = row_sec + 1
    End If
    Next row_main

    Segítséget előre is köszönöm.

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