Spoštovani!
Napisal sem macro za lazje delo v Excelu in nekaj funkcij me moti pri delu.
Prosim: če bi mi Vi macro malo uredili da dela kako Bog zapoveda.
kadar mu ukazem Run on prenese podatke iz "Poloznica v ARHIV, ali mi potem ostano oba lista sive barve obelezan in na listu Poloznice se Filter prikaze samo tiste katere so po ukazom. "i" ..
Če je možno da v macro brisete code katere to delajo.
Na ove tri slike se vide moje tezave.
Hvala za Vsako pomoc in nasvet.
Macro.
Bližnjica: Ctrl+i
'
Sheets("ARHIV").Select
Range("B4:L30").Select
Selection.ClearContents
Range("A1").Select
Sheets("Poloznice").Select
Range("B4").Select
ActiveWindow.SmallScroll Down:=-13
Range("M4").Select
Selection.AutoFilter
ActiveWindow.SmallScroll ToRight:=-13
Selection.AutoFilter Field:=13, Criteria1:="i"
Range("B4:L30").Select
Selection.Copy
Sheets("ARHIV").Select
Range("B4").Select
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False _
, Transpose:=False
End Sub
excel 2013 Macro Kode pomoc
Re: excel 2013 Macro Kode pomoc
Pozdravljeni,
Na konec makra dodajte naslednje ukaze:
Na konec makra dodajte naslednje ukaze:
Koda: Izberi vse
'... vaša koda ....
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
'.. to dodajte ..
Sheets("Poloznice").Select
ActiveSheet.ShowAllData
Range("A1").Select
Sheets("ARHIV").Select
Range("A1").Select
end sub
lp,
Matjaž Prtenjak
Administrator
Matjaž Prtenjak
Administrator
Re: excel 2013 Macro Kode pomoc
Gospod!
Hvala za pomoč, zdaj delo vredu.
Hvala in Lep pozdrav
Hvala za pomoč, zdaj delo vredu.
Hvala in Lep pozdrav