XL 2013 connaitre le type de variable tableau un ou 2 dim et le sens

[patricktoulon]

Bonjour a tous
je cherche un moyen efficace de savoir quelle est le type de variable tableau une ou deux dim et est une ligne ou une colonne sans avoir a gérer des erreurs dans un sens ou dans l'autre
@Yeahou a donné un début de piste interessant mais c'est pas full right

Sub testy7()
a = [A1:H1].Value
MsgBox oneDim(a)
End Sub

Sub testy8()
a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)
MsgBox oneDim(a)
End Sub

Sub testy9()
Dim a(0 To 5, 1)
  a(5, 0) = "toto "
MsgBox oneDim(a) & " " & UBound(a, 2)
End Sub

'***********************************************************
'ERREUR!!!!
Sub testy10() ' erreur donne vrai quand base 0
Dim a(0 To 5, 0)
  a(5, 0) = "toto "
 'a(5) = "titi"    'erreur " nombre de dimensions incorect"
Msgbox  oneDim(a) & " " & UBound(a, 2)
End Sub
'***********************************************************

Sub testy11() '
Dim a(0 To 5)
MsgBox oneDim(a)
End Sub

Function oneDim(a)
  oneDim = UBound(a) + 1 - LBound(a) = Application.CountA(a)
End Function

il faudrait le moyen de compter le base 0 et ce sera bon

 

[patricktoulon]

Bonsoir Robert

 

[dysorthographie]

bonsoir Patrick,
Dans VB tu vas dans les références, parcourir, et tu sélectionnes RD.tlb

 

[patricktoulon]

ben je ne peux pas enregistrer la dll ,je risque pas de la trouver dans les refs
elle est en 32 ou 64?

 

[dysorthographie]

Si tu changes RD.tlb dans ton projet VB pas de problème !
Ça fonctionne invariablement sur 32/64 bits

 

[patricktoulon]

j'ai pas visual studio a la maison

 

[dysorthographie]

Dans le zip il y a le fichier RD.tlb c'est lui qu'il faut charger dans Excel->vba->références->parcourir->RD.tlb

RD.tlb contient le manifeste de la DLL

 

[patricktoulon]

oui j'ai vu mais je les met ou ces fichiers
j'ai essayé de les enregistrer mais ca veut pas
alors comment je peux les avoir dans les ref si ils sont pas enregistré

 

[dysorthographie]

 

[patricktoulon]

re

 

[dysorthographie]

je viens de compiler en X86 uniquement

 

[patricktoulon]

re
Bonjour Robert
mille excuse je me suis écroulé hier
bon j'ai changé pour la source X86 et j'ai le même message d'erreur

 

[dysorthographie]

Bonjour Patrick,
j'ai tenté sans succès de reproduire le problème!

pour compiler j'ai utiliser le framework 3.5!
si tu dispose d'une autre version dis moi la quelle!

 

[patricktoulon]

re
j' ai la 4.7.2
chez moi mais j'ai la 3.5 au bureau sur pc et je sais pas sur le portable du boulot
ça va donc poser un problème pour une install générique
tu devrais travailler la dessus

 

[dysorthographie]

oui tu as raison il faut que j'envisage un pack de déploiement qui embarque le 4.7.2 framework utiliser!

 

[patricktoulon]

re
ben c'est toujours pas bon