🚀 go-pugleaf

Wojtek pisze:

> 
> Czy można w Calcu zbudować taką formułę (lub "załatwić" to w jakiś
> inny sposób) aby przy każdym wydruku wartość liczby w danej komórce
> zwiększała się o "1"?
> 

Można, Tylko nie pytaj dokładnie jak :)

Trzeba by użyć makra reagującego na zdarzenie drukowania.
W Excelu byłoby to zdarzenie [event] WorkbookBeforePrint
A jak jest w OO ??

-- 
@2010 Johnson
Przeciwko nudzie nawet bogowie walczyli daremnie.

On Mon, 04 Oct 2010 15:00:15 +0200
Johnson <johnson@nospam.pl> wrote:

> Wojtek pisze:
> 
> > 
> > Czy można w Calcu zbudować taką formułę (lub "załatwić" to w jakiś
> > inny sposób) aby przy każdym wydruku wartość liczby w danej komórce
> > zwiększała się o "1"?
> > 
> 
> Można, Tylko nie pytaj dokładnie jak :)
> 
> Trzeba by użyć makra reagującego na zdarzenie drukowania.
> W Excelu byłoby to zdarzenie [event] WorkbookBeforePrint
> A jak jest w OO ??

Tak samo.

Tools
Customize
Events
wybrać na liście zdarzenie Print Document
Assign Macro
i wskazać procedurkę, mniej-więcej taką:
  Sub PrintCounter
    pc = thisComponent.Sheets(0).getCellRangeByName("A1")
    pc.Value = pc.Value + 1
  End Sub

-- 
Tomasz Minkiewicz <tommink@gmail.com>

On 4 Paź, 19:13, Tomasz Minkiewicz <tomm...@gmail.com> wrote:
> Tools
> Customize
> Events
> wybrać na liście zdarzenie Print Document
> Assign Macro
> i wskazać procedurkę, mniej-więcej taką:
>   Sub PrintCounter
>     pc = thisComponent.Sheets(0).getCellRangeByName("A1")
>     pc.Value = pc.Value + 1
>   End Sub

Witam

Dzięki za podpowiedzi - zrobiłem jak powyżej ale wywala mi taki błąd
przy naciśnięciu przycisku drukuj:

Wystąpił błąd modułu Scripting Error podczas wykonywania skryptu Basic
o nazwie vnd.sun.star.script:Standard.Module1.Main?
language=Basic&location=application .
Komunikat: The following Basic script could not be found:
library: 'Standard'
module: 'Module1'
method: 'Main'
location: 'application'

Co zrobiłem nie tak?

Pozdrawiam

Wojtek

On Mon, 4 Oct 2010 10:58:53 -0700 (PDT)
Wojtek <wotik@interia.pl> wrote:

> On 4 Paź, 19:13, Tomasz Minkiewicz <tomm...@gmail.com> wrote:
> > Tools
> > Customize
> > Events
> > wybrać na liście zdarzenie Print Document
> > Assign Macro
> > i wskazać procedurkę, mniej-więcej taką:
> >   Sub PrintCounter
> >     pc = thisComponent.Sheets(0).getCellRangeByName("A1")
> >     pc.Value = pc.Value + 1
> >   End Sub
> 
> Witam
> 
> Dzięki za podpowiedzi - zrobiłem jak powyżej ale wywala mi taki błąd
> przy naciśnięciu przycisku drukuj:
> 
> Wystąpił błąd modułu Scripting Error podczas wykonywania skryptu Basic
> o nazwie vnd.sun.star.script:Standard.Module1.Main?
> language=Basic&location=application .
> Komunikat: The following Basic script could not be found:
> library: 'Standard'
> module: 'Module1'
> method: 'Main'
> location: 'application'
> 
> Co zrobiłem nie tak?

A skąd my mamy wiedzieć. Chiba coś źle przypisałeś. Tzn. wygląda na to,
że przypisałeś procedurę Main, której z jakiegoś powodu już nie ma.

Poza tym wygląda mi na to, że wrzucasz procedurkę nie tam, gdzie
trzeba. Nie zapisuj jej w globalnej bibliotece, tylko w skoroszycie,
w którym będzie wykorzystywana. Przy przypisywaniu do zdarzenia
upewnij się też, że w rozwijanej liście na dole, na której wybierasz
gdzie ma być zapisane przypisanie, wybrany jest ów skoroszyt, a nie
„Openoffice.org”.

-- 
Tomasz Minkiewicz <tommink@gmail.com>

On 5 Paź, 09:35, Tomasz Minkiewicz <tomm...@gmail.com> wrote:
> A skąd my mamy wiedzieć. Chiba coś źle przypisałeś. Tzn. wygląda na to,
> że przypisałeś procedurę Main, której z jakiegoś powodu już nie ma.
>
> Poza tym wygląda mi na to, że wrzucasz procedurkę nie tam, gdzie
> trzeba. Nie zapisuj jej w globalnej bibliotece, tylko w skoroszycie,
> w którym będzie wykorzystywana. Przy przypisywaniu do zdarzenia
> upewnij się też, że w rozwijanej liście na dole, na której wybierasz
> gdzie ma być zapisane przypisanie, wybrany jest ów skoroszyt, a nie
> "Openoffice.org".

Witam

Wielkie dzięki za pomoc.
Już wszystko działa ok.

Pozdrawiam

Wojtek

On 6 Paź, 08:43, Wojtek <wo...@interia.pl> wrote:

> Witam
>
> Wielkie dzięki za pomoc.
> Już wszystko działa ok.

...choć nurtuje mnie jeszcze kwestia ;-)

Zakładam, że użytkownik wydaje polecenie druku danej strony z arkusza
np. 20x
W chwili obecnej mój "licznik" zwiększa się w takim przypadku tylko o
"1".
Czy istnieje możliwość aby w przypadku wydania komendy druku np. 20x
tej samej strony, dla każdej wydrukowanej strony zwiększał się ten
licznik o "1"?

Pozdrawiam

Wojtek