< návrat zpět

MS Excel


Téma: Auto. tisk stránek + auto. změna dat rss

Zaslal/a 28.3.2018 11:28

Zdravím
mám takový problém - s VBA moc neumím a tak bych Vás chtěl poprosit o pomoc. Problém - potřebuji aby jsem zadal range (např. 800-900) a makro mi automaticky měnilo čísla podle range a následně i tiskla. Tudíž začnu na 19-18-800 (viz příloha) ta se vytiskne a dále pokračujeme +1 -> 19-18-801 tisk a tak dále a tak dále až po 19-18-900.
Předpokládám že hodnota 800 bude muset být v samostatné buňce to není problém potřebuji jen pomoci s makrem které už bych si posléze upravil (nějaký ten základ programování mám)
Předem děkuji za jakoukoliv radu a pomoc
MS excel 2010

Příloha: png39994_bez-nazvu.png (35kB, staženo 28x)
39994_bez-nazvu.png
Zaslat odpověď >

#039995
avatar
Zdraavím.
Co takhle:
For a = 800 To 900
List1.Range("K3") = "19-18-" & a
Tisk
Next
citovat
#039997
avatar
Sub pokus()
For a = 1301 To 1303
ActiveSheet.Range("C8") = "19-18-" & a
ActiveSheet.PrintOut
Next
End Sub


Vyřešil jsem to takto a funguje !! Díky moc teď se jen potýkám s drobností že mě excel nenechá makro upravovat (potřebuji pro každý list jiné hodnoty) a prostě se zamkne a odmítá komunikovat. Nějaká rada ohledně tohoto ?citovat
#039998
avatar
Vyřešeno prosím lock :) Děkuji moc za raducitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

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.

Aktivní diskuse