VBA - Déclaration d'une variable tableau avec constante

ldetienne100 · 27 Avril 2015

Bonjour,

Il me faut une constante pour déterminer la dimension d'une variable tableau. La valeur de la constante dont j'ai besoin est égale à la valeur de Log(base1 ^ gr1) / Log(base2) arrondi à la hausse, soit Round(Log(base1 ^ gr1) / Log(base2) + 0.5).

Voici mon code:

Sub Macro1()

Const base1 = 12
Const base2 = 34
Const gr1 = 8
Const gr2 = Round(Log(base1 ^ gr1) / Log(base2) + 0.5)

Dim nb2(gr2) As Byte

Le débogueur bute toujours sur le mot «Round». Je me demandais alors comment contourner ce petit problème.

Merci!

Dranreb · 27 Avril 2015

Re : VBA - Déclaration d'une variable tableau avec constante

Bonsoir.

Je ne vois que ce moyen :

VB:

Sub Macro1()
Const base1 = 12
Const base2 = 34
Const gr1 = 8
Dim nb2() As Byte
ReDim nb2(Int(Log(base1 ^ gr1) / Log(base2) + 1))

Staple1600 · 27 Avril 2015

Re : VBA - Déclaration d'une variable tableau avec constante

Bonsoir à tous

Et comme ceci, cela ne t'irait pas ?

Code:

Sub Macro1()
Dim gr2, nb2() As Byte
Const base1 = 12
Const base2 = 34
Const gr1 = 8
gr2 = Round(Log(base1 ^ gr1) / Log(base2) + 0.5)
ReDim nb2(gr2)
MsgBox UBound(nb2)
End Sub

EDITION: Bonsoir Dranreb, désolé pour la collision, je n'avais pas vu ton message 😱

ldetienne100 · 28 Avril 2015

Re : VBA - Déclaration d'une variable tableau avec constante

Merci à vous! Les codes fonctionnent très bien!

VBA - Déclaration d'une variable tableau avec constante

ldetienne100

Guest

Dranreb

XLDnaute Barbatruc

Staple1600

XLDnaute Barbatruc

ldetienne100

Guest

Discussions similaires

VBA - Déclaration d'une variable tableau avec constante

ldetienne100

Guest

Dranreb

XLDnaute Barbatruc

Staple1600

XLDnaute Barbatruc

ldetienne100

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency