Létrehozása eljárások és függvények VBA Excel, átviteli paramétereket

előző ◈ a következő

Létrehozása VBA eljárások és függvények az Excel, múló paraméterek eljárások és függvények

1. feladat:

Hozzon létre egy modult 1. modul, a személyes makró könyv Personal. xls új fMultiply () függvényt. amely:

· Figyelembe bemeneti paraméterként a két szám;

· Megszorozza őket, és visszaadja az értéket.

2. feladat:

Készítsen ugyanabban a modulban Makros5_1 makró az alábbi kód:

Public Sub Makros5_1 ()

Dim nMult1 As Integer

Dim nMult2 As Integer

Dim nResult As Integer

nMult 1 = CInt (InputBox ( "Enter az első számot:"))

nMult 2 = CInt (InputBox ( "Enter a második szám:"))

Változás eljárás Makros5_1 úgy, hogy kiosztott változók nMult1 és nMult2 fMultiply () függvény és az értéket kap a változó nResult (ezt az értéket kell használni helyett mereven meghatározott érték 10).

Kezdés Makros5_1 végrehajtani, és ellenőrizze, hogy a értékek átadását fMutliply () és az általa benyújtott összhangban a feladat.

A megoldás a feladatot 1:

1. Indítsa el az Excel, majd kattintson +. A ProjectExplorer csomópont bővítése VBAProject (Personal XLS) | modulok, és kattintson duplán a bal egérgombbal a modul 1 sor.

Public Function fMultiply (nm1 As Integer, nm2 As Integer)

fMultiply = nm1 * nm2

A megoldás, hogy a feladat 2:

Kódja Makros5_1 makró () a következőképpen nézhet ki (módosított kódot félkövér):

Public Sub makro 5_1 ()