Díky moc za rady.
Ještě mám jednu prosbu,
když budu mít v buňce B3 napsáno 24000Kč tak potřebuji aby se mi napsalo do buněk B9:B12 a B15:B18 vzorec "do buňky "B9"=C9*101 do buňky "B10"=C10*101 a tak dál.
Děkuji moc za radu.
moc moc díky
Ahoj všem, prosím o radu. Jsem začátečník a potřebuji poradit, jestli je možné zadat funkci KDYŽ se do buňky H1 napíše písmeno "B" tak aby se do buňky B3 napsala částka 1500Kč, pokud by se do buňky H1 napsalo písmeno "O" tak aby se do buňky B3 napsala hodnota 24000Kč.
Děkuji moc
Ahoj všem,
prosím, mohl by mi někdo poradit....
mám makro pro tisk s náhledem před tiskem, kde si vyberu tiskárnu, zvolím že chci tisknout jednostranně a vždy mi to vytiskne oboustranně, což je špatně.
Předem moc děkuji
Sub Tisk_nářadí()
Dim A(), Pocet As Integer, Listy() As String, i As Byte
Pocet = -1
With ThisWorkbook
ReDim A(1 To 40, 1 To 1)
A = .Worksheets("Nástup prac.").Cells(3, 1).Resize(40).Value2
For i = 83 To 122
If Not IsEmpty(A(i - 82, 1)) And IsNumeric(A(i - 82, 1)) Then
Pocet = Pocet + 1
ReDim Preserve Listy(Pocet)
Listy(Pocet) = .Worksheets(i).Name
End If
Next i
If Pocet > -1 Then
'.Worksheets(Listy).Select
'Application.CommandBars.ExecuteMso ("PrintPreviewAndPrint")
.Worksheets(Listy).PrintPreview
End If
End With
End Sub
Ahoj všem,
prosím o pomoc...
potřeboval bych makro na hromadný tisk s podmínkou:
v listu 1 mám data, jsou v buňkách A3:L42
tyto vyplněné buňky se automaticky kopírují do Listů 3 až 44
data z řádku A3:L3 se kopírují do formuláře v Listu 3
data z řádku A4:L4 se kopírují do formuláře v listu 4 atd.
a takhle se to opakuje až po řádek A42:L42 = List 44
potřebuji abych vytiskl hromadně List 3 až List 44 ale pod podmínkou že je ve sloupci A3:A42 nějaké číslo...
data nejsou vždy ve všech 42 řádcích - proto ta podmínka abych zbytečně neplýtval papírem a netiskl všech 42 formulářů, když jich mám předvyplněných méně.
Předem moc díky
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.