Prenos vsebine vrstice iz enega del.lista v drugega

[Vikmar]

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.

[admin]

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"

[Vikmar]

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.