Microsoft Excel topic - PROHARDVER! Hozzászólások

Hirdetés

Legfrissebb anyagok

PROHARDVER! témák

Mobilarena témák

IT café témák

GAMEPOD témák

LOGOUT témák

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

Delila_1 veterán

#10176
#10175 Oly
2011-04-27 19:25:49

Ú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

Delila_1

veterán

#10175 Oly

Látom, értékeket illesztettél be a table lapra. Ha ez nem fontos, fel lehet gyorsítani azzal, hogy kihagyjuk a Select-eket.
Sub Masol() Dim sor%, sor_1% Sheets("make").Select sor_1% = 1 For sor% = 1 To 111 If Cells(sor%, 1) > "" Then Sheets("table").Cells(sor_1%, 1).EntireRow.Insert Range("A" & sor% & ":I" & sor%).Copy Sheets("table").Cells(sor_1%, 1) sor_1% = sor_1% + 1 End If Next End Sub
Ha mégis az értékek beillesztése kell, holnap megírom.
Szerk.: ez az A1-től másol, az A11-től való másolásnál a For-Next ciklust 11-től kell indítani.
A makródban nem látom a sorok beszúrását (EntireRow.Insert).

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

Topikgazda

Bővebben a topikgazda rendszerről...

Aktív témák

Hirdetés

Új fizetett hirdetések

Üzleti előfizetők hirdetései

Állásajánlatok

Számítástechnikai értékesítő

Cég: Laptopműhely Bt.

Város: Budapest

Részletek