• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

Příspěvky uživatele

Asi by to chtělo přílohu, takhle to není až tak moc jasné :-/.

Co mě na první pohled zaráží je, že v definici oblasti názvu necháváš List1, tudíž oblast by měla být na Listu 1. ale když to pak chceš obarvit, tak tam máš Hárok1.Range .... .
Takhle na první pohled bych tipoval chybu v tomtu nesouladu listů (jednou list a pak hárok).

M@

nepřímý odkaz, příklad v příloze.

M@

Nebo trochu jednodušší způsob :-)
Dim soubor As String
Soubor = Application.GetOpenFilename
List1.Range("A1").Formula = "=HYPERLINK(" & Chr(34) & soubor & Chr(34) & ", " & Chr(34) & Dir(soubor) & Chr(34) & ")"

M@

asi by neuškodilo vložit nakonec ještě
set dotaz = nothing
ale to už je jen jakési hraní se zanedbatelnými prostředky pc.

M@

Zkus do procedury clicku vložit toto:
Dim soubor As String
Set dotaz = Application.FileDialog(msoFileDialogFilePicker)
With dotaz
.AllowMultiSelect = False
.InitialView = msoFileDialogViewDetails
.Title = "Vyber soubor"
.Show
For Each f In .SelectedItems
soubor = f
Next
End With
List1.Range("A1").Formula = "=HYPERLINK(" & Chr(34) & soubor & Chr(34) & ", " & Chr(34) & Dir(soubor) & Chr(34) & ")"
M@

Office 2003 -> Nástroje -> Sdílet sešit.

Při uložení se to pak v případě že 2 uživatelé změní stejnou buňku, zeptá jestli přijmout změny.
Je to použitelné řešení, ale osobně bych se radši přiklonil k tvému bodu č. 2 :-)

M@

Asi by to chtělo přiložit ten načítací soubor a pak třeba 2 zdrojové. Pokud jde o 3000 souborů, tak bych to určitě neřešil propojovacím vzorcem, ale vyplněním hodnot.
Makro může smyčkou postupně otevřít všechny xlsb soubor v dané složce, z těchto vzít hodnoty a zapsat je do načítacího souboru tak jak je třeba a každý soubor po sobě zase zavřít.

M@

Možná by stačil jen ten vzoreček :-). Pravděpodobně číslo generuješ dle nějakého maxima v jisté oblasti, která je na vlastním listu, což když se vzoreček přenese na jiný list, tak si asi opět pracuje sám se sebou, jinými slovy relativní odkaz. V tomto případě ale změna relativního na absolutní asi moc nepomůže, pokud to má generovat číslo dle obou listů, ale jak říkám, chce to minimálně vidět ten vzoreček a v lepším případě i přílohu.

M@

Ahoj, sice to není úplně přesně ono, ale zkus si nejprve prohlédnout řešení v článku: http://wall.cz/index.php?m=topic&id=7163#post-7181 třeba se ti zalíbí :-)

M@

Ahoj,

zkus třeba:
Dim soubor As String
soubor = Dir$("P:\*.txt")
Name "P:\" & soubor As "P:\yxz.txt"

M@

snad pomůže příloha.

M@

Na Zebru lze určitě tisknout přímo z Excelu, když si nastavíš někde na listu layout a budeš doplňovat jen proměnné. Co se čárového kódu týče, tak existují i ve formě fontů, jenž lze použít v excelu, což by byl nejsnažší způsob.
Složitější způsob by byl tisk přímo z makra kde vše nadefinuješ pomocí fce Printer.
No a poslední způsob, který asi nedokážu detailně popsat, ale u nás se Zebrou funguje, někde v Bartenderu je vytvořen layout etikety (*.btw) ten má nějaké proměnné. Bartender sleduje přednastavenou sloužku a jakmile se tam objeví datový soubor tak ho vytiskne. Soubor musí obsahovat jakousi hlavičku obsahující cestu k souboru layoutu jenž má být pro daný štítek použit, cestu k dočasnému souboru pro tisk, název tiskárny kde má být vytištěn. Pod hlavičkou pak následují názvy proměnných a hodnoty jenž v nich mají být vytištěny.
Ale jak říkám, nejsnažší je tisk přímo z excelu, kdy si na listu nastavíš oblast tisku na velikost etiketu, připravíš rozmístění polí (v buňkách) a pak už do nich budeš jen dosazovat.

M@

No já si to myslel, ale to pak je použitý špatný typ grafu, je třeba požít graf XY bodový se spojnicema.

M@

Asi to nebude to pravé, ale aspoň nějaký pokus :-)

M@

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse