< návrat zpět

MS Excel


Téma: Adresa uložení listu s měnící adresou rss

Zaslal/a 31.10.2017 13:33

Merlin99Zdravim všechny, chci se zeptat jestli by někdo vedel jak upravit nasledujici MAKRO které jen veme list1 a ulozi jeho kopii na pozadovane místo v pocitaci. Otazka zni je mozne mit nekde třeba na listu2 v bunce B2 adresu ulozeni ( T:\Export\__Erik\___IT ). S tim ze bych ji mohl v sesitu prepisovat a v makru by se to ukládalo podle toho. Děkuji moc za napady 1

Sub POKUS()
'
POKUS Makro
'

'
Sheets("List1").Select
ActiveSheet.Buttons.Add(379.5, 52.5, 116.25, 62.25).Select
Sheets("List1").Copy
ChDir "T:\Export\__Erik\___IT"
ActiveWorkbook.SaveAs Filename:="T:\Export\__Erik\___IT\POKUS99MALED.xlsx", _
FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
ActiveWindow.Close
Range("E2").Select
End Sub

Zaslat odpověď >

#038204
avatar
Zdravím, lze cesta= List2.Range ("B2") 1citovat
#038210
elninoslov
Tak príklad...
Ale s kopírovaním listu do nového zošitu už bolo popísaných veľa problémov. Nevysvetliteľných chovaní. Treba s tým počítať. Aj tu sme už viedli siahodlhú debatu na túto tému, ale nechce sa mi to hľadať...
Příloha: zip38210_kopiruj-list-ako-novy-subor.zip (18kB, staženo 30x)
citovat
#038214
Merlin99
elninoslov : tet sem si stim pohral a poupravil a je to bomba funguje MASAKR DÍKY moooooc skvela prace 9 5citovat

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