..|| Blog || Produkti/Storitve || MExcel || MDodatki || 300 nasvetov ||..

Prenos vsebine vrstice iz enega del.lista v drugega

Pomoč pri delu z MS Excelom

Prenos vsebine vrstice iz enega del.lista v drugega

OdgovorNapisal/-a Vikmar » Sr apr 10, 2019 11:23 am

Pozdravljeni.
Na kakšen način lahko dosežem, da vsebino pojubne vrstice iz enega del.lista ( preko makra ali kako drugače) prenesem v naslednjo prazno vrstico na drugem del.listu
( varianta copy-paste mi je poznana :) ) . Hvala za odgovor.
Vikmar
 
Prispevkov: 5
Pridružen: Pe jun 10, 2016 8:36 pm



Matjazev.NET
 

Re: Prenos vsebine vrstice iz enega del.lista v drugega

OdgovorNapisal/-a admin » Sr apr 10, 2019 12:11 pm

Pozdravljeni,

Sem vam napisal makro in tudi razložil kaj in kako natančno deluje:
Koda: Izberi vse
Sub kopirajNaDrugList(imeIzvornegaLista As String, stevilkaVrstice As Long, imePonornegaLista As String)
  ' izberemo oma lista
  Dim ws1 As Worksheet: Set ws1 = Worksheets(imeIzvornegaLista)
  Dim ws2 As Worksheet: Set ws2 = Worksheets(imePonornegaLista)
 
  ' na drugem listu najdemo prvo prazno vrstico
  Dim praznaVrstica As Long
  praznaVrstica = ws2.Range("A1000000").End(xlUp).Row
  If (Trim(ws2.Cells(praznaVrstica, 1)) <> "") Then praznaVrstica = praznaVrstica + 1
 
  ' skopiramo celotno vrstico iz izvornega lista na ponorni list
  ws2.Rows(praznaVrstica).Value = ws1.Rows(stevilkaVrstice).Value
End Sub


Izvedba pa je preprosta:

Če želite kopirati vrstioc 15 in lista 1 na list 2, boste poklicali:
Koda: Izberi vse
kopirajNaDrugList "List1", 15, "List2"


Če pa želite recimo kopirati 23 vrstico iz lista "naloge" na list "arhiva_2019", pa
Koda: Izberi vse
kopirajNaDrugList "naloge", 23, "arhiva_2019"
lp,
Matjaž Prtenjak
Administrator
admin
Site Admin
 
Prispevkov: 3530
Pridružen: Sr jul 20, 2005 10:06 pm

Re: Prenos vsebine vrstice iz enega del.lista v drugega

OdgovorNapisal/-a Vikmar » Če apr 11, 2019 9:38 am

Hvala za trud in dobro voljo...res!
Če zapisano pravilno razumem bi mi ta makro prišel prav, če bi želel kopirati točno določeno vrstico iz lista A v prvo prazno vrstico na listu B.
Nisem pa razumel, ali je makro, ki ste ga napisali namenjen tudi kopiranju poljubne vrstice, ki jo označim v listu A in jo želim kopirati v prvo prazno vrstico na listu B?
Okej.Poskusim in javim.
Vikmar
 
Prispevkov: 5
Pridružen: Pe jun 10, 2016 8:36 pm


Vrni se na Excel

Kdo je prisoten

Po forumu brska: Bing [Bot] in 1 gost

cron