RejestrowanieMakra

Narzędzia główne Wstawianie Układ strony Formuły Dane

Recenzja

Widok Deweloper

Team

ej mm

•&i -    X

.^Zarejestruj makro

Użyj odwołań względnych

/z •—

Właściwości Wyświetl koci

_j5 Importuj

&

Visual Makra Basic    _f\ Bezpieczeństwo makr

Koń

Wstaw Tryb

• projektowania £1 Uruchom okno dialogowe

||g—I    'ł'¹¹'¹

- Pakiety rozszerzenia

Źródło    Paneł

^v|OD5wrer dane

<c>

dokumentu

Formanty

XMl

Modyfikowanie

A

G1

/» 1

1

2

3

4

5

6 7

8

9

10 11 12

13

14

15

16 17

18

19

20

21

22

23

24

25

26

27

^B I C

Rejestrowanie Makra

D |

_L F

H

Microsoft Visual Basic - cw02.xlsrr.

Project - VBAProiect

a

a

VBAProject (cw02.xlsm)

H] Arkusz 1 (Arkusz 1)

H] ArkuszZ (Arkusz2)

B] Arkusz 3 (Arkusz 3)

<#Ą, Module 1 ^ ThisWorkbook VBAProject (FUNCR£S.XLAM)

Properties - Modulel

Modulel Module Alphabetic j Categorized |

(Name)

Modulel

M * ► w Arkuszl ,/Arkusz2 Arkusz3 U

—

s

a

1

2

3

4

5

6

7

8

File Edit View Insert Format Debug Run Tools Ądd-Ins Window Help

;    ,•«    ► u j *Ł & y y «

cw02.xlsm - Modulel (Codę)

EM

(General)

|5ub Makrol ()

I

• Makrel Makrc

Makrol

Gotowy ^“J

Rar.ęe ("31") .Select

ActiveCell.FormulaRlCl = "Rejestrowanie Makra"

Rar.ęe ("El") .Select W i t;h Selection. Interior .Pattern = xiSolid . PatternColorIndex = xlAutomatic .Color = 65535 .TintAndShade = 0 . PatternTintAr.dShade Er.d With

Rar.ęe ("Gl") .Select ActiveCell.FormulaRlCl =

Rar.ęe ("G2 ") . Select ActiveCell.FormulaRlCl =

Rar.ęe ("Gl: G2 ") . Select

Selection.AutoFill Destunation:=Rar.ęe("Gl:G9"), Type:=xlFillDefault Rar.ęe ("G1:G9") .Select Application. Wrr.dow5tate = xlMinimized Application. Wrr.dow5tate = xlNormal Er.d Sub

r=J_I

= 0

ni n

n 2 w