Příspěvky uživatele
< návrat zpět
je to předělané. Pokud chceš vložit přílohu, musíš jí zabalit do zip, nebo rar.
Třeba takto přes inputbox.
Jednoduchý soubor podle zadaných kritérií.
Jeden pokus.
Třeba takto.
Myslím si, že to od JOKER nebude fungovat, protože v databazi vybírá sloupec A a ty máš data v B,C,D,E,F. Vyzkoušej moje.
Tak jsem si stáhl přílohy a asi hodinu zkoumal který je jaký soubor, ale jsem z toho ...
vložit makro do
Private Sub Workbook_Open()
End Sub
přímo v ThisWorkbook
Dovolím si tady mírně změnit jedno přísloví:
1. Bez přílohy na wall nelez (Bez peněz do hospody nelez) 
Takto?
Takto?
Mi funguje toto
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim NazevListu As String
NazevListu = ActiveCell.Value
If Len(NazevListu) > 0 Then
Sheets(NazevListu).Select
End If
End Subt
End Sub
Děkuji. S grafy jsem ve VBA ještě nepracoval. Ty makra byly normálně nahrány, ale spustit šlo jen to první.
Prosím zkušenější o radu. Proč graf pod druhým tl. nejde vytvořit? Děkuji.
Třeba takto. A je cesta. B je vytvářený adresář
Sub VytvorAdresar()
Dim A As String
Dim B As String
A = "C:\Users\JF\Desktop\wall\"
B = Range("A1")
If Len(Dir(A & B, vbDirectory)) = 0 Then
MkDir A & B
MsgBox "Adresář vytvořen."
Else: MsgBox "Adresář existuje."
End If
End Sub
Uživatelské menu
\nMenu
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.
RSS nejnovější články