< návrat zpět

MS Excel


Téma: kopiruj vzdy s posledneho zosita rss

Zaslal/a 11.10.2020 19:50

Ahojte potrebovala by som poradit mam zosit a na nom su cca znacene harky od 1 do 50. Potrebujem aby mi vzdy s posledneho zosita skopirovalo hodnoty s buniek U34:51 a vlozilo mi ich do harka celkom do buniek C40:R40.

este by ma potesilo ak by sa dalo tieto bunky urobit tak ked sa nezhoduju medzi sebou bud mi vyskoci sprava alebo staci ich len oznacit dakou farbou

Zaslat odpověď >

Strana:  « předchozí  1 2 3 4 5   další »
#048447
Lugr
Text v názvu souboru?citovat
#048448
avatar
Lebo dnes som prisiel ze starsie zosity mam pisane ako zostatky november 2020.xlsm Ak by s tym bol problem tak skusim prepisat nazvy zositovcitovat
#048451
Lugr
Takhle?
Příloha: zip48451_48440_desktop.zip (45kB, staženo 19x)
citovat
#048452
avatar
Parada tak uz budem vediet ako nabuduce nieco upravit. este raz vam velmi pekne dakujemcitovat
#048453
Lugr
Není za co.citovat
#048454
avatar
Dobry den pan Lugr pisat som vam email ohladne pomoci s excelom neviem ci vam dosielcitovat
#052271
avatar
Zdravim potreboval by pomoct s kodom ktory robil LUGR len sa tu uz dlhsiu dobu neuazal jedna sa o jeho posledny prispevok s 18.10.2020 13:16

Povodne to kopiruje udaje vzdy s posledneho ciselneho harku 1-20.
Ja by potreboval keby mie tieto udaje vedelo tahat tak ze najde v PC predposledny mesiac a skopiruje udaje s harka Sumár D5:D75 a udaje vlozi do zosita s aktualnym mesiacom na harok test E13-E73

Lebo neviem nato prist ako to prehodit.Dakujem za pomomoc
Příloha: zip52271_48451_48440_desktop.zip (46kB, staženo 9x)
citovat
#052272
Lugr

pavol14pavol napsal/a:

Zdravim potreboval by pomoct s kodom ktory robil LUGR len sa tu uz dlhsiu dobu neuazal jedna sa o jeho posledny prispevok s 18.10.2020 13:16

Povodne to kopiruje udaje vzdy s posledneho ciselneho harku 1-20.
Ja by potreboval keby mie tieto udaje vedelo tahat tak ze najde v PC predposledny mesiac a skopiruje udaje s harka Sumár D5:D75 a udaje vlozi do zosita s aktualnym mesiacom na harok test E13-E73

Lebo neviem nato prist ako to prehodit.Dakujem za pomomocPříloha: 52271_48451_48440_desktop.zip (46kB, staženo 1x)


Teď tomu nerozumím, kde má být to makro co má hledat předposlední měsíc? 4citovat
#052273
avatar
to makro co vyhladava predchadyajuci mesiac je ulozeny v zosite november na harku menu. Potem je uz len VBA makro ktore kopiruje udaje jeho nazov je import.citovat
#052275
avatar

pavol14pavol napsal/a:

to makro co vyhladava predchadyajuci mesiac je ulozeny v zosite november na harku menu. Potem je uz len VBA makro ktore kopiruje udaje jeho nazov je import.


Sub Import()

Dim Cesta As String
Dim Zdroj As String
Dim Cil As String
Dim LastSheet As Worksheet
Dim WS As String

Sheets("Menu").Range("E6") = ThisWorkbook.Name
Sheets("Menu").Range("E7") = ThisWorkbook.Path & "\"

Cesta = Sheets("Menu").Range("E4")
Zdroj = Sheets("Menu").Range("E5")
Cil = Sheets("Menu").Range("E6")

If Dir(Cesta) = "" Then
MsgBox "Soubor " & Cesta & " nebyl nalezen!", vbCritical
Exit Sub
End If

Workbooks.Open Filename:=Cesta
Set LastSheet = Sheets(ActiveWorkbook.Sheets.Count)
WS = LastSheet.Name
Sheets(WS).Range("G20:G32").Copy
Windows(Cil).Activate
Sheets("Zostatok").Range("F27").PasteSpecial Paste:=xlPasteValues, Transpose:=True
Windows(Zdroj).Activate

Application.CutCopyMode = False
ActiveWindow.Close savechanges:=False

Range("F29").Select

End Subcitovat

Strana:  « předchozí  1 2 3 4 5   další »

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje