Příspěvky uživatele
< návrat zpět
Myslim, ze jste si odpovedela sama.
Jsou opravdu jen dve moznosti:
1) Pouzit Perxonal.xlsb (s tim, ze se na nej budete muset odkazovat)
2) nakopirovat kod do vsech souboru, ktere ho budou pouzivat.
'odemknuti
Activesheet.Unprotect "Heslo"
'zamknuti
activesheet.Protect "Heslo"
ja jsem tak pomalej... 
NO, pokud potrebujete zkopirovat list z jednoho sesitu do druheho, musite sesit (a jeho umisteni) take definovat.
napr takto:
Sheets("f_eko").Copy Before:=Workbooks("Sesit, kde chybi list").Sheets(1)
Tento prikaz zkopiruje list 'f_eko' do 'sesitu, kde chybi list' a to pred List1 (bude tedy prvnim listem v sesitu).
tady jsou nejake vlastnosti obrazku:
'nastavení pozice zhora a zleva
ActiveSheet.Pictures(1).Top = 200
ActiveSheet.Pictures(1).Left = 200
'nastavení velikosti sirky a vysky
ActiveSheet.Pictures(1).Width = 200
ActiveSheet.Pictures(1).Height = 100
'odstraneni obrazku
ActiveSheet.Pictures(1).Delete
vlozeni lze provest takto:
ActiveSheet.Pictures.Insert "C:\Obrázky\doklad.jpg", Range("D10")
no dobre, ale setrideni je jedna vec a vybrani hodnot vec druha. Musite tedy definovat, jake hodnoty se maji vybrat ve sloupci A, jake hodnoty ve sloupci B a jake ve sloupci G.
Uvadite jen priklad P_20 S 235JR, ale treba mohou vzniknout i dalsi a je proto nutne definovat obecne, co chcete vybrat - snad jsem to popsal srozumitelne.
Idealni je, kdyz date priklad s kompletnim vysledkem, ktereho chcete dosahnout!
Promennou lze mezi procedurami predavat takto:
Sub Prvni_procedura()
Dim Promenna As String
Promenna = "toto je hodnota"
Call Druha(Promenna)
End Sub
Sub Druha_procedura(ByVal Promenna)
MsgBox Promenna
End Sub
Otazka je, co znamena "selectovat" - kdyby to znamenalo vyber, bude otazka znit: "Co se ma z uvedenych sloupcu vybrat?"
Nebo to znamena tridit?
takto?
asi to ne uplne spravne chapu,
chcete pri unicializaci Userformu zobrazit text s odkazem?
Kde se ma vzit text a kde odkaz?
Prilozte radeji soubor...
Na toto slouzi funkce NEPŘÍMÝ.ODKAZ, probleme je, ze sesity, na ktere se odkazujete museji byt otevrene (pokud jsou zavrene, je potreba pouzit makro)
Tak tohle se musi komplet predelat - bude to nejakej den trvat, nemam ted na to cas...
No, to zalezi na tom, jak budete chtit mit ta data usporadana.
Pokud budete nekdy jeste davat nejaky dotaz, zkuste ho podat v cele siri, protoze je dobre znat cely problem - reseni pak muze byt jine nez u casti problemu.
slo by to asi takto:
Je to udelane pres pojmenovane oblasti, tak nesmite zadnou pridat (krome dalsiho jmena, kde jinaopak pridat musite).
Uživatelské menu
\nMenu
On-line nástroje
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
RSS nejnovější články