EXCEL 2007 - jak pomocí VBA vytisknout aktivní řádek na jehličkovou tiskárnu a ..
Pomozte někdo, kdo se vyznáte v excelu, jak vytisknout aktivní řádek po změně ve sloupci 3.
Podle tohoto odkazu http://gymzv.sk/~vyuka/informatika/excel/excelentn e/chipex05/09/excel_vba_udalosti.html (díky MachR55)
se dá zajistit, aby událost vložení něčeho do třetího sloupce spustila něco.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Oblast As Range'definice sledované oblasti
Set Oblast = Range("C1:C1000")'test výběru
If Union(Oblast, Target).Address = Oblast.Address Then
MsgBox "Změněna hodnota v buňce " & Target.Address(0, 0)
End IfEnd Sub
Jaký kód vložený mezi if a endif zajistí, aby se vytiskly první tři buňky (sloupce) aktuálního řádku?
A jakmile se něco změní v dalším řádku ve sloupci tři, ať se vytisknou zase první tři buňky (sloupce) v tomto dalším řádku pod.
Tak asi vyřešeno, excel jsem pustil k vodě, natáhnu si to do něj z texťáku pozdějc.
Vyhrabal jsem staší počítač WXP s paralelním portem, nastavil tisk přímo na tiskárnu, spouštím při startu z bat souboru řádek:
type con: |wtee.exe -a vaha.txt lpt1
Chová se to solidně, samo si to případně vytvoří soubor vaha.txt, nebo když už existuje, tak to do něj připisuje další řádky, a v případě ukončení a znovustuštění počítače připisuje pořád dál do téhož souboru.
Když soubor vaha.txt přejmenuju (samozřejmě to jde provést až po ukončení cmd okna s type con: ...), tak si wintee vytvoří nový.
Přesně jak potřebuju.
Děkuju všem za pomoc i z minulého vlákna, kde byl zmíněn super prográmek wintee.