• Skrypt z Informatyki (Makro oraz VisualBasic)!!! 2007-05-25

NA KOŃCU JEST ROZDZIAŁ „NAJCZĘŚCIEJ ZADAWANE PYTANIA”

WPIERW PRZECZYTAJ A POTEM RÓB

I. MAKRO

1. Rejestracja makra

1.Aby zarejestrować makro należy wybrać w MS Word>> Narzędzia>> Makro

>>Zarejestruj nowe makro.

2.Wyskakuje nam okienko:

Zmieniamy jego nazwę na: Alek (oczywiście może być inna nazwa). Następnie przypisujemy makro albo do „Paska narzędzi” albo do „Klawiatury”.

-My przypiszemy do paska narzędzi.

3. Nasze kolejne okienko, i wybieramy w nim zakładkę „Polecenia”.

Przeciągamy ikonę wskazaną na zdjęciu powyżej na pasek narzędzi.

Następnie naciskamy na przycisk „modyfikuj zaznaczenie”, który powinien się nam rozwinąć do takiej postaci (patrz zdjęcie poniżej).

Dzięki tym opcjom (patrz zdjęcie powyżej), zmieniamy wygląd naszego makra.

4. Ostatnia już część roboty, po naciśnięciu przycisku „Zamknij”, naszym oczom powinna ukazać się ikona:

Otóż, gdy ona się pojawia komputer rozpoczyna rejestrowanie wszystkiego, co robimy, najczęściej takie makro ma za zadania na przykład zapamiętać nasze dane personalne, byśmy podczas pisania jakieś pracy wciąż ich nie wpisywali, lub nazwę waszej szkoły, by nie pisać na przykład za każdym razem (na przykład), Uniwersytet Kardynała Stefana Wyszyńskiego.

Pamiętaj że cokolwiek będziesz pisał, kasował, wklejał makro będzie to rejestrowało, więc nie zdziw się jeśli twoje makro zamiast jednej linijki ma ich dziesięć.

Po wpisaniu tekstu (a nawet wstawieniu obrazka), kończymy rejestrację naszego makra naciskając w naszej ikonce niebieski kwadracik, czyli „kończenie rejestracji makr”. „Wstrzymywanie rejestracji makr” ma nam służyć, gdy nie chcemy aby makro rejestrowało czegoś w danej chwili.

Po zakończeniu rejestratora powinna nam zniknąć biała kasetka zamiast kursora. Teraz możemy sprawdzić nasze makro naciskając na naszą ikonę na pasku narzędzi.

2. Wchodzenie w makro

Ktoś mógłby się pokusić o pytanie, ale jak wygląda makro od strony programowania?, aby to sprawdzić wybieramy Narzędzia>> Makro >> Makra>> Wkrocz/Edytuj (jeśli mamy więcej makr to musimy wybrać te makro które nas interesuje).

W tym najprostszym makro wyróżniamy

- „Sub” i „End Sub” czyli początek i koniec makra

- Datę rejestracji makra, oraz przez kogo było rejestrowane

- Tekst programowania „Selection.TypeText Text:=”Alek jest super”

(czyli „Wstaw następujący tekst, tekst= Alek jest super”)

Powracamy do „worda” wychodząc po prostu z naszego makra.

Uwaga!!!

My posługujemy się językiem programowania „ Basic”, ale są też języki „Python”, „C”, C++” i inne.

3. Kasowanie makra

Nie jest to sprawa łatwa, pamiętamy pewnie czynność, że przeciągaliśmy makro na pasek narzędzi? No właśnie, z tym jest problem, otóż samo kasowanie kodu przebiega następująco wybieramy Narzędzia>> Makro >> Makra>> Usuń (pamiętajmy żeby wybrać odpowiednie makro). Lecz na razie usunęliśmy tylko kod makra, ale nie ikonę w pasku narzędzi, aby ją zlikwidować musimy udać się do rejestratora makra („Zarejestruj nowe makro”). Tam standardowo wybieramy „pasek narzędzi” (olewamy zabawę z nazwą dla makra) i wybieramy zakładkę „polecenia”, zaznaczamy nasze makro do skasowania, a raczej ikonę widniejącą na pasku narzędzi, i wybieramy przycisk „modyfikuj zaznaczenie” a tam opcję „usuń”, nasze makro powinno zniknąć. Po wybraniu „zakończ” powinna nam się ukazać standardowa procedura rejestrowania, ale my ją omijamy naciskając niebieski kwadracik (nie X gdyż nie zakończymy rejestrowania makra).

4. Instrukcja warunkowa

W rozdziale III skasowaliśmy makra. Możemy w takiej sytuacji na nowo zarejestrować makro, albo przejść przez Narzędzia>> Makro>> Edytor VisualBasic.

Instrukcja warunkowa służy do wyróżnienia w tekście pogrubionych wyrazów (akurat o to nam chodzi). Wchodzimy w nasze makro i zastępujemy stare polecenie następującym:

If Selection.FormattedText.Bold= -1 Then

Selection.TypeText („<b>”)

Selection.MoveRight Unit:= wdWord

Selection.TypeText („</b>”)

Selection.MoveLeft Unit:= wdWord

End If

Selection.MoveRight Unit:= wdWord

Powinno wyglądać to tak:

Bierzemy File>> SaveNormal, czyli zapisujemy nasze dokonania.

Co oznaczają następujące komendy:

- “If”, “Then”, “End If”, czyli “Jeżeli”, “Wtedy”, „Koniec jeżeli”

To jest właśnie instrukcja warunkowa

- Selection.FormattedText.Bold= -1 czyli Tekst pogrubiony

- Selection.TypeText („<b>„), czyli Wstaw tekst („<b>”)

Zamiast <b> można wstawić coś innego jak @@@ albo $$$ (sprawdź sam)

- Selection.MoveRight Unit:= wdWord, czyli przesuń kursor w prawo (MoveRight) o wyraz.

Słowo wyjaśnienia komputer to taki autystyczny dzieciak, zajebiście liczy ale jak mu nie powiesz co robić to on tego nie ogarnie. Pisząc instrukcję warunkową i aktywując ją dzięki naszej ikonce na pasku narzędzi, nasze makro kieruje się według naszej instrukcji, więc musi być ona rozpisana łopatologicznie. Kursor to jest początek, od jego położenia komputer wykonuje nasze polecenie. Wyobraźmy sobie, kursor stoi przed grubym wyrazem, dajemy mu komendę że:

„Jeżeli” (If)

„wyraz pogrubiony” (Selection.FormattedText.Bold= -1)

“wtedy” (Then)

“wstaw tekst” (Selection.TypeText („<b>”))

“Przesuń kursor w prawo o wyraz” (Selection.MoveRight Unit:= wdWord)

„Znów wstaw teskt” (Selection.TypeText („</b>”))

„Cofnij się o jeden wyraz” (Selection.MoveLeft Unit:= wdWord)

„Koniec jeżeli” (End if)

W tym momencie mamy ładnie zaznaczony („<b>”)pogrubiony tekst („</b>”), ale nasze polecenie zawiera też jeszcze jedną komendę, otóż jeżeli wyraz nie jest pogrubiony to makro ma go po prostu ominąć mówi o tym komenda usytuowana po End If:

Selection.MoveRight Unit:= wdWord

5. Pętla

Jak może zauważyliście nasz program po włączeniu ogarnia tylko po jednym wyrazie, jest to dość nudne i monotonne, a co jeżeli mamy do zaznaczenia tekst co ma dla przykładu 20 stron?. Do takich zadań służy nam w makrze pętla. Pętla to instrukcja, która ma swój początek i koniec.

• Nasza pierwsza wersja pętli będzie się odnosiła do określonej ilości wyrazów.

X=X+1

Za każdym razem gdy wykonywana jest pętla,

x zwiększa się o jeden (u nas aż osiągnie wartość dziesięć)

For x=1 To 10

If Selection.FormattedText.Bold= -1 Then

Selection.TypeText („<b>”)

Selection.MoveRight Unit:= wdWord

Selection.TypeText („</b>”)

Selection.MoveLeft Unit:= wdWord

End If

Selection.MoveRight Unit:= wdWord

Next x

Po wkroczeniu w makro, makro powinno wyglądać tak:

Co widzimy nowego to „For x= 1 To 10”, oraz „Next x”. To właśnie pętla, z tym że liczba 10 mówi do ilu wyrazów musi się pętla ograniczyć.

Ale co gdy pętla ma się wykonać tylko tyle razy ile mamy wyrazów?

Należy wpierw sprawdzić w wordzie (tekście) ile mamy tych wyrazów:

Narzędzia >> Statystyka wyrazów, i w poleceniu „For x= 1 To ...”, po To... wpisać liczbę wyrazów.

Na przykład „For x=1 To 223”

• Druga wersja pętli, występuje w dwóch wariantach.

Do -Wykonaj

...

...

...

Loop Until... - Wykonuj aż do momentu gdy...

While... - Wykonuj pętle podczas gdy...

Jej zadaniem, jest to że jeżeli nie chce nam się sprawdzać ilości wyrazów, lub chcemy aby działała tylko do pewnego momentu, na przykład akapitu, tudzież danego wyrazu, to właśnie wtedy ją stosujemy.

1. W pierwszym przypadku aż dojdzie do akapitu.

Do

If Selection.FormattedText.Bold= -1 Then

Selection.TypeText („<b>”)

Selection.MoveRight Unit:= wdWord

Selection.TypeText („</b>”)

Selection.MoveLeft Unit:= wdWord

End If

Selection.MoveRight Unit:= wdWord

Loop Until Selection.Text = Chr(13)

A wygląda to tak:

Jak zauważyliście mamy coś takiego jak „Chr (13)”. Otóż, gdy wciskamy jakiś przyciski na klawiaturze to każdy symbol posiada swój kod, edytor tekstu (tudzież ogólnie komputer) rozpoznaje ten kod z klawiatury [ASCI]. Chr (13) oznacza numer enteru (w naszym przypadku akapit).

b) W drugim przypadku aż dojdzie do wybranego słowa. Inaczej rzecz biorąc, zamiast ograniczać pętle do enteru (akapitu), to na końcu tekstu umieścimy jakiś szczególny znak lub ciąg znaków, na przykład „*”, i gdy pętla dojdzie do niego to się wyłączy.

Do

If Selection.FormattedText.Bold= -1 Then

Selection.TypeText („<b>”)

Selection.MoveRight Unit:= wdWord

Selection.TypeText („</b>”)

Selection.MoveLeft Unit:= wdWord

End If

Selection.MoveRight Unit:= wdWord

Loop Until Selection.Text = “*”

Wygląda to tak:

ZWRÓĆ UWAGĘ CZY W TWOIM TEKŚCIE NIE JEST WPISANY * WYTŁUSZCZONY/POGRUBIONY „*”

Uwaga!!!

Gdzie znaleźć czcionki?

Folder ”Fonts”

Mój komputer>> Dysk>> Windows>> Fonts

Ustawienia charakteru czcionki (chr) (Char code as long)

[Kod aski]

II. Edytor Visual Basic

Jest to język programowania obiektowy. Czyli polecenia, komendy, instrukcje są przypisane do pewnych obiektów.

Aby otworzyć Edytor Visual Basic należy standardowo wkroczyć w makra i tam wybrać Insert -> UserForm [Interfejs użytkownika (graficzny)]

1. Liczenie wyrazów w Visual Basic

Visual BASIC posłuży nam do liczenia wyrazów w tekście a wynik zostanie podany w polu tekstowym. W przeciwieństwie do poprzednich makr, tutaj w jednym polu graficznym będzie więcej niż jedno makro. Przycisk „Start” rozpocznie liczenie wyrazów i kończy go, natomiast przycisk „Stop” nie tylko kończy pracę programu ale zwalnia także używaną pamięć podręczną Worda.

Potrzebujemy:

2x CommandButton -przycisk

1x TextBox - pole tekstowe (będzie pokazana ilość wyrazów w tekście)

Command Buttony jak i TextBox1 znajdziemy w ToolBox. Jeżeli nie widzimy Toolboxa, włączamy go po prostu naciskając na siatkę gdzie będę rysowane obiekty graficzne.

Następnie rysujemy (przeciągamy) te nasze przyciski, raz naciskamy przycisk to możemy zmienić jego nazwę, dwa razy to wchodzimy w programowanie, wizualnie widzimy coś takiego:

Teraz wchodzimy w przycisk „Start” (dwa razy naciskając), i wprowadzamy kod:

Do

Selection.MoveRight Unit:= wdWord

x=x+1

Loop Until Selection.Text = „*”

TextBox1=x

Wygląda to tak:

Jak widzimy na końcu naszego tekstu musi znajdować się gwiazdka aby makro na niej się zatrzymało.

Kiedy zaprogramowaliśmy „Start” przechodzimy do „Stop”, aby wyjść z makra

(CommandButton „Start”) naciskamy po prostu „userForm1” (na obrazku powyżej zaznaczony jest na szaro).

Znów widzimy nasze przyciski i naciskamy dwukrotnie „Stop” , i wpisujemy:

Unload Me

Wygląda to tak:

Oprócz kodu naszego „Stop” na obrazku, wyświetlany jest też „Start”

Wracamy do naszego Graficznego układu (naciskamy UserForm1). Bierzemy File>> SaveNormal, czyli zapisujemy nasze dokonania.

A następnie wybieramy niebieski położony trójkącik „Run Sub/UserForm”:

Te białe pole za słowem TEST to błąd, tego nie ma:]

W czasie sprawdzania działania programu wygląda to tak:

PAMIĘTAJ KOŃCZYMY PRACĘ POPRZEZ „STOP”!!!

2. Losowanie

Teraz zajmiemy się graficzną interpretacją losowania (generowaniem liczb losowych). Na początku musimy stworzyć nasz układ obiektów, potrzebujemy:

1x Frame

3x Label

2x Command Button

Układamy go w następujący sposób (można też w inny oczywiście).

Jak widzimy Label1,2 i 3 znajduje się w „Frame”.

Zanim przejdziemy do programowania, powinniśmy pozmieniać nazwy w tym programie.

Uczynić możemy to standardowo, poprzez pojedyncze kliknięcie i nadaniu nazwy, albo szybciej, dzięki paskowi „Properties”.

Przyjrzyjmy się „Properties” „CommandButton1” (w zależności którą część układu graficznego będzie zaznaczona, będą inne „ustawienia”).

Mamy podział „alphabetic” (alfabetycznie), albo „categorized” (według kategorii). W jednym i drugim mamy to samo (pamiętajmy że dla innych przycisków mogą być inne ustawienia).

Spójrzmy co oznaczają one (te ustawienia), według spisu alfabetycznego.

Pamiętajmy, zmieniając nazwę na przykład przycisku to nie w „Name” tylko w „Caption”!!!

Wybrałem tylko te najważniejsze, ale można też zmieniać wielkości przycisku i wiele innych.

Ja zrobiłem coś takiego:

Oczywiście można, zrobić lepsze:] Ja pokasowałem nazwy takie jak „frame”, czy „label”

(w „properties”> „caption”) przy pomocy „backspace” (na klawiaturze), natomiast jeśli chcecie usunąć wstawione przez was zdjęcia („properties”> „picture”), musicie uczynić to poprzez przycisk „delete” (też na klawiaturze).

Programowanie:

-W „Start” wstawiamy:

Do

Label1.Caption = Int(Rnd * 10)

Label2.Caption = Int(Rnd * 10)

Label3.Caption = Int(Rnd * 10)

Exit Sub

Loop

-W „Stop” wstawiamy standardowo:

Unload me

Wygląda to tak:

Int oznacza liczby naturalne, Rnd liczby losowe.

Zapisujemy „Save Normal” i testujemy.

Wychodzimy poprzez „Stop”!!!

Oczywiście jeżeli nie wygląda to zbyt dobrze, za małe cyfry lub coś podobnego, należy pozmieniać „properties”.

3. Jednoręki bandyta

Teraz zrobimy jakiś lepszy użytek z naszej wiedzy i użyjemy stworzymy jednorękiego bandytę.

• Interfejs graficzny

2x Frame

3x Label

1x Image

2x CommandButton

Proponuje użyć tego co już zrobiliśmy wcześniej czyli graficznego układu z “Losowanie” i dodać dodatkowe „Frame” w którym wklejamy „Image1” (Wszystko z „TollBox”).

Teraz zmienimy wygląd nowej „Frame” i nowego „Image”, dodając obrazek i zmienimy jego ustawienia.

.

Musimy zmienić w „Properties” obrazka funkcję „Visible” z „True” na „False”!!!

Dzięki czemu nasz obrazek nie będzie się pojawiał od razu na początku „Testu” programu.

• Generowanie liczb pseudolosowych (obliczanie algorytmu), czyli programujemy!

-Start:

Do

Label1.Caption=Int(Rnd*10)

Label2.Caption=Int(Rnd*10)

Label3.Caption=Int(Rnd*10)

If (Label1.Caption=7) and (Label2.Caption=7) and (Label3.Caption=7) Then

Image1.Visible =True

Exit Sub

End If

Loop

-Stop:

Unload me

Wygląda to tak:

Podczas testu wygląda to tak:

Uwaga!!!

W instrukcji warunkowej zamiast „And” może być „Or”, wtedy wyskakują różne cyfry.

• Żeby pokazywało ilość losowań

Musimy dodać jeden “TextBox1” z “ToolBoxa”.

Na zdjęciu powyżej w czerwonym kółku nasz dodany textbox.

• Programowanie:

-Start

Do

x=x+1

Label1.Caption=Int(Rnd*10)

Label2.Caption=Int(Rnd*10)

Label3.Caption=Int(Rnd*10)

If (Label1.Caption=7) and (Label2.Caption=7) and (Label3.Caption=7) Then

Image1.Visible =True

Exit Sub

End If

TextBox1=x

Loop

-Wygląda to tak:

A „test” wygląda tak:

1. Kalkulator

Ach rodzynek wśród programowania:]

Spróbujemy odtworzyć kalkulator Windowsa w wersji podstawowej, czyli dodawanie, odejmowanie, mnożenie, dzielenie liczb.

Potrzebujemy:

1xTextBox1

17x CommandButton ,na przyciski numeryczne „0-9”, na przyciski służące do operacji (+,-,/,*), przycisk równa się, przycisk kończący program oraz przycisk czyszczący „TextBox1”

Robimy taki układ (oczywiście może być inny) oraz nadajemy mu na razie tylko odpowiednie oznaczenia.

Programowanie:

CommandButton numeryczne:

Każdy CommandButton numeryczny musi zawierać polecenie

TextBox1 = TextBox1 + "Z" gdzie za Z musimy wstawić odpowiednio liczby przypisane do przycisków numerycznych.

Odpowiednio:

Private Sub CommandButton1_Click()
TextBox1 = TextBox1 + "1"

End Sub

Private Sub CommandButton2_Click()
TextBox1 = TextBox1 + "2"
End Sub

Private Sub CommandButton3_Click()
TextBox1 = TextBox1 + "3"
End Sub

Private Sub CommandButton4_Click()
TextBox1 = TextBox1 + "4"
End Sub

Private Sub CommandButton5_Click()
TextBox1 = TextBox1 + "5"
End Sub

Private Sub CommandButton6_Click()
TextBox1 = TextBox1 + "6"
End Sub

Private Sub CommandButton7_Click()
TextBox1 = TextBox1 + "7"
End Sub

Private Sub CommandButton8_Click()
TextBox1 = TextBox1 + "8"
End Sub

Private Sub CommandButton9_Click()
TextBox1 = TextBox1 + "9"
End Sub

Private Sub CommandButton10_Click()
TextBox1 = TextBox1 + "0"
End Sub

-Dzięki temu zabiegowi w “TextBox1” będą się pojawiały odpowiednie cyfry.

Wygląda to tak:

Programowanie CommandButton działania:

Po pierwsze na samej górze musimy umieścić „Deklaracje zmiennej” a mianowicie

„Public X,Y as Integer”. Umożliwia użycie zmiennych w wielu procesach.

Programowanie CommandButton działania „+”:

Private Sub CommandButton11_Click()
Y = 1
X = TextBox1
TextBox1 = ""
End Sub

Programowanie CommandButton działania „-”:

Private Sub CommandButton12_Click()
Y = 2
X = TextBox1
TextBox1 = ""

End Sub

Programowanie CommandButton działania „*”:

Private Sub CommandButton13_Click()
Y = 3
X = TextBox1
TextBox1 = ""
End Sub

Programowanie CommandButton działania „/”:

Private Sub CommandButton14_Click()
Y = 4
X = TextBox1
TextBox1 = ""
End Sub

Wygląda to tak:

-Jak widzimy mamy dwie zmienne, X mówi o wstawieniu w „TextBox1” , Y odnosi się do działania „równa się”.

Programowanie CommandButton „równa się”.

Private Sub CommandButton15_Click()
If Y = 1 Then TextBox1 = X - -TextBox1
If Y = 2 Then TextBox1 = X - TextBox1
If Y = 3 Then TextBox1 = X * TextBox1
If Y = 4 Then TextBox1 = X / TextBox1
End Sub

-Należy to czytać tak “Jeżeli ktoś przycisnął “+” wtedy w TextBox” do obecnej liczby w kalkulatorze dodajemy „+” liczbę która została wprowadzona „TextBox” wcześniej.

Programowanie CommandButton końca.

Private Sub CommandButton16_Click()
Unload Me
End Sub

-Tu standardowo

Programowanie CommandButton czyszczenia.

Private Sub CommandButton17_Click()
TextBox1 = " "
End Sub

- Ten “ “ oznacza pustkę, wyczyszczenie.

Te trzy przyciski wyglądają tak:

A teraz EFEKT czyli nasz TEST (z uwzględnieniem zmian graficznych):

Całość kodu kalkulatora:

Public X, Y As Integer

Private Sub CommandButton1_Click()

TextBox1 = TextBox1 + "1"

End Sub

Private Sub CommandButton2_Click()

TextBox1 = TextBox1 + "2"

End Sub

Private Sub CommandButton3_Click()

TextBox1 = TextBox1 + "3"

End Sub

Private Sub CommandButton4_Click()

TextBox1 = TextBox1 + "4"

End Sub

Private Sub CommandButton5_Click()

TextBox1 = TextBox1 + "5"

End Sub

Private Sub CommandButton6_Click()

TextBox1 = TextBox1 + "6"

End Sub

Private Sub CommandButton7_Click()

TextBox1 = TextBox1 + "7"

End Sub

Private Sub CommandButton8_Click()

TextBox1 = TextBox1 + "8"

End Sub

Private Sub CommandButton9_Click()

TextBox1 = TextBox1 + "9"

End Sub

Private Sub CommandButton10_Click()

TextBox1 = TextBox1 + "0"

End Sub

Private Sub CommandButton11_Click()

Y = 1

X = TextBox1

TextBox1 = ""

End Sub

Private Sub CommandButton12_Click()

Y = 2

X = TextBox1

TextBox1 = ""

End Sub

Private Sub CommandButton13_Click()

Y = 3

X = TextBox1

TextBox1 = ""

End Sub

Private Sub CommandButton14_Click()

Y = 4

X = TextBox1

TextBox1 = ""

End Sub

Private Sub CommandButton15_Click()

If Y = 1 Then TextBox1 = X - -TextBox1

If Y = 2 Then TextBox1 = X - TextBox1

If Y = 3 Then TextBox1 = X * TextBox1

If Y = 4 Then TextBox1 = X / TextBox1

End Sub

Private Sub CommandButton16_Click()

Unload Me

End Sub

Private Sub CommandButton17_Click()

TextBox1 = ""

End Sub

III. Najczęściej zadawane pytania:

1. Mój word trzeszczy, nic nie da się zrobić.

Podczas pisania wielu makr na komputerze, może się zdarzyć że makra nie skończyły debugowania, czyli znajdowania błędów, poprawy błędów, a także wciąż w tle są włączone, aby nasze makro w końcu zaczęło działać powinniśmy wpierw uczynić to o czym mówi podpunkt 2) w „Najczęściej zadawane pytania”. Następnie, gdy znajdziemy się w makrze po prostu wciskamy przysick „reset” który jest na górze programu. Powinny nam się wszystkie makra zresetować. Przydałoby się je także skasować.

2. Nie mogę włączyć makr, word zaczął trzeszczeć, mrugać.

Otóż przy włączonym mrugającym wordzie należy nacisnąć ALT+CTRL+DELETE, i nacisnąć na worda. W tym momencie powinno w tle wyskoczyć okienko z działającymi makrami. Sam menadżer zadań zamknąć, nie kończąc działania programu word. Gdy będzie się to powtarzało, to należy pokasować wszystkie makra Narzędzia>> Makra>> Makro>> Organizator i USUŃ!!

3. Zdjęcia w Skrypt z informatyki pojawiają się jeśli nie używam suwaka (nie przewijam) w wordzie, czy to normalne?

Tak to jest normalne.

4. Rejestrowałem makro, widzę wciąż kasetkę, nie widzę niebieskiego kwadracika i nic nie mogę zrobić:

Otóż nie zakończyłeś rejestracji do końca, musisz wziąć Narzędzia>> Makra>> Zatrzymanie rejestrowania. („Rejestracja nowego makra” została zastąpiona „Zatrzymanie rejestrowania”)

5. Nie rozumiem miałem wrócić do UserForm 1 a ja tam nic nie mam.

Musisz zwracać uwagę w której lokacji wpisujesz dane, czy programujesz UserForm 1, czy UserForm 2. To samo z makrami, musisz zwracać uwagę które konkretnie programujesz.

6. Nie widzę UserForm, Insert, File, Properties.

Znajdują się one w Visual Basic:

7. Mój komputer zamienia w wordzie literę za literę, a ja chce żeby wstawiał nową przed starą!!

Masz włączone na klawiaturze opcję „INSERT”, po prostu go naciśnij. (Ciekawostka: nigdy facet nie zadał mi pytania dlaczego literki zamieniają się z innymi, zamiast stawać przed nimi).

8. Nie wiem dlaczego ale komputer nie wyróżnia pogrubionego tekstu (patrz pod rozdz. 4 oraz 5).

Musiałeś zapomnieć ustawić kursor przed tekstem, a nie po. To samo jeśli twój komputer zacznie wariować zwróć uwagę gdzie leży kursor, ma być przed tekstem a nie na przykład po gwiazdce „*” (patrz pod rozdz. 5 a i b).

9. Po co w skrypcie teksty z UWAGA!!!

Otóż to jest ważne:]

10. Jak przenieść makro/program na inny komputer czyli import/export pliku

Jeżli chcemy przenieść nasze makro/program na inny komputer, bez ponownego pisania go możemy użyć funkcji import/export pliku. Gdy zapiszemy program „Plik”>”Zapisz” widzimy niżej funckję „Export pliku”. Naciskamy i naczym oczom ukazuje się się możliwość wybrania miejsca zapisu (propnuje w jakimś nowym folderze). Po zapisaniu, nasz program będzie zapisany z roszerzeniem .frm i .frx.

Kiedy będziemy chcieli wgrać nasz program na komputer użyjemy „Import pliku”, i tak komputer wgra nasz program. Pamiętajmy jednak by żaden z userformów nie powtarzał się w nazwie, bo komputer nie wgra naszego programu skoro nazywa się jak program już wcześcniej wgrany (wniosek, przy exportowaniu i zapisywaniu, należy zmienić jego nazwę). Może się zdażyć że plik nie chce się importować, wtedy należy użyć „reset” (patrz N.Z.P. punkt 1).

11. Dlaczego nie ma opisu i spsobu programowania ComboBoxu?

Bo nie.

12. Dlaczego nie ma dodatkowych programów?

Bo nie, użyj własnych pomysłów, ja widziałem naprawde super programy/gry które korzystały z podstawowych komend.

13. Ja i tak nic z tego nie rozumiem, mimo EXTRA napisanego skryptu nic mi nie wychodzi...

Chwyć monitor oburącz, poproś brata lub siostrę, lub kogoś z najbliższej rodziny o wzięcie w dłonie komputera, i z całej siły ciśnijcie osprzętem przez okno.

WAŻNE!!!:

W folderze zdjęcia znajdują się wszystkie zdjęcia ze skryptu.

Makra v1.6 (starsze 2007-04-14), 1.7 (2007-05-24), 1.7.1 (2007-05-25) oraz 1.8 (2008-03-25) to właśnie cały Skrypt z Informatyki (Makra oraz Visual Basic)!!!

Dokument BBB- na nim najlepiej wszystko testować.

UWAGA!!!

SKRYPT NIE PRZEZNACZONY DO SPRZEDARZY!!!

Zmiany w wersji 1.7 i 1.7.1:

-Podział na skryptu na Makro oraz Visual Basic

-Większa przejrzystość tekstu

-Drobne zmiany w tekście

-Rozbudowa działu „Najczęściej zadawane pytania”

+Poprawione podpunkty

+Opis debugu

+Jak przenieść makro/program na inny komputer czyli import/export pliku

+Dlaczego nie ma opisu i spsobu programowania ComboBoxu?

+Dlaczego nie ma dodatkowych programów?

-Poprawiony czytaj to!!!

-Zamiana słów „rysunek” na „zdjęcia”

1

---