Kliknite tukaj, da si ogledate profil, kot ga vidijo drugi

Kopiranje vrstic

Delite vsebino na Facebooku
Delite vsebino na Twitterju
  Med velikim številom podatkov v Excelu se velikokrat ne znajdemo. V tej lekciji bomo iz velike tabele skopirali vsako peto vrstico.
 
 
1
 
 
Predstavljajte si, da imate veliko število vrstic s podatki.

Iz te tabele želite skopirati vsako 5. vrstico in jo prilepiti na nov list. Ročno delo 
– zelo zamudno. Delo nam lahko opravi tudi Excel.
 
 
2
 
 
Kliknite Alt+F11, da odprete VBA. Sedaj kliknite na majhno črno puščico in nato na Module.
 
 
3
 
 
Sedaj prilepite spodnjo kodo:

Sub KopirajVrstice()
    Dim i, j, prviStolpec, vrstica, trenutniList
    j = 1
    trenutniList = ActiveSheet.Index
    
    vrstica = 5     ' Faktor kopiranja
    i = 1           ' Začetek kopiranja
    prviStolpec = 1 ' Prvi stolpec, ki vsebuje podatke
    
    Sheets.Add after:=Sheets(Sheets.count)  ' Dodajanje novega lista
    ActiveSheet.Name = "Kopirano"           ' Preimenovanje novega lista
    Sheets(trenutniList).Select
    
    Do Until Cells(i, prviStolpec).Value = ""
        Rows(i & ":" & i).Select
        Selection.Copy                      ' Kopiranje vrstice
        
        Sheets(Sheets.count).Select
        Rows(j & ":" & j).Select
        ActiveSheet.Paste                   ' Lepljenje vrstice
        
        Sheets(trenutniList).Select
        
        i = i + vrstica
        j = j + 1
    Loop

   MsgBox "Uspešno kopiranih " & j - 1 & " vrstic"
End Sub

 
 
4
 
 
Koda morda zgleda malce bolj zapleteno, poskusil jo bom razložiti na enostaven način. Če želite podrobno pojasnilo, prosite na forumu.

Prilepljeno kodo si lahko povsem prilagodite vašim potrebam.

Prva številka, ki jo lahko spremenite je, katere vrstice naj Excel kopira. V moji kodi je številka 5, kar pomeni, da bo Excel kopiral vsako peto vrstico. Če vpišete številko 1, bo skopiral vse vrstice, če vpišete številko 2, bo skopiral vsako drugo vrstico in tako naprej.

Naslednjo spremenljivko sem poimenoval i. Tukaj nastavite, od katere vrstice naj začne Excel kopirati. Če pustite številko 1, pomeni, da bo Excel začel kopirati pri prvi vrstici na listu. Če vpišete številko 10, bo začel kopirati šele od desete vrstice naprej.

Tretja spremenljivka Excelu pove, kje se nahajajo vaši podatki. Excel namreč v kodi preveri, ali je že prišel do konca vaših podatkov, za kar pa potrebuje številko stolpca, v katerem se nahajajo podatki. V mojem primeru se podatki začno že v prvem stolpcu, zato je zapisana številka 1 ...
 
 
 
 
 
5
 
 
... če bi se vaši podatki začeli šele v npr. stolpcu F in šele v 4 vrstici, bi vnesli naslednje podatke:

i = 4
vrstica = 6

F je šesti stolpec po vrsti :)


 
 
6
 
 
Ko končate s prilagajanjem makra, kliknite na zeleno puščico zgoraj in držite pesti ...
 
 
7
 
 
... da vam Excel uspešno kopira vaše podatke ... 
 
 
8
 
 
... na nov list.
 
 
9
 
 
Uspelo! V mojem zadnjem stolpcu so bile zaporedne številke.

Kot lahko vidite tukaj, je Excel zares kopiral vsako peto vrstico :)
 
 
Komentiraj
 
 
 
 
 
21.7.2011, 11:17
Zanima me, kako iz te tabele v priponki prekopirati sobote in nedelje z datumi?

 
 
 
 
21.7.2011, 11:33
tamicena, na zmaga.com lahko preko gumba "Izberi datoteko", nalagaš le slike (.jpg).

Dokument naloži kam drugam (SkyDrive, Google Dokumenti, File.si ...) in potem v objavo dodaj povezavo do dokumenta.


spremenil: Matej V. (21.7.2011 ob 11.33.36)
 
 
 
 
21.7.2011, 12:43
Ups... hvala za opozorilo , evo link: http://file.si/public/viewset/65076
 
 
 
 
24.7.2011, 20:49
Predlagam uporabo filtra

http://www.zmaga.com/ucenje.php?t=0&....
 
Prijava in registracija
 
 
 
Zmaga.com ponuja brezplačno in razumljivo učenje računalniških programov, vas na enkraten način spozna z različnimi svetovnimi jeziki, s podrobno obrazloženimi recepti prikaže čare kulinarike in vam prežene strahove pred domačimi opravili.
 
 
Poleg tega lahko prebirate poučne članke, ki so namenjene širjenju naše splošne razgledanosti ter preverite svoje znanje z priljubljenim in enostavnim sistemom za preverjanje znanja. Če med vsebinami, ki se dodajajo vsak dan, ne najdete želenega znanja, je za vaša vprašanja na voljo dobro obiskan forum, kjer lahko tudi aktivno sodelujete. V primeru, da bi radi svoje praktično znanje delili z ostalimi, pa to lahko storite preko preprostega vmesnika za dodajanje vsebin. Zmagajte z znanjem z Zmaga.com!