Utilitaire d'analyse VBA

Utilitaire d'analyse VBA - VB/VBA/VBS - Programmation

Marsh Posté le 28-06-2006 à 11:55:07    

Bonjour,
je suis sous Excel. Je veux connaître l'équivalent du code VBA des formules suivantes : =DECBIN, =BINDEC.....   bref toutes les formules qui se trouvent dans Outils>Macro complémentaire> Utilitaire d'analyse.
 
Merci :pt1cable:

Reply

Marsh Posté le 28-06-2006 à 11:55:07   

Reply

Marsh Posté le 28-06-2006 à 12:00:01    

bonjour :hello:  
l'aide d'excel ne te convient pas ?
tu as les arguments en entrée, et on te donne les résultats en sortie...

Reply

Marsh Posté le 28-06-2006 à 12:54:43    

Salut,
peut-être tu peux m'aider. Pour consulter l'aide (F1) faut déjà connaître le nom de ces fonctions.  Comme je l'ai dit, je connais les formules sous excel je voudrais connaître leur équivalent en VBA. SVP ne me dites pas d'enregistrer la macro et taper ensuite la formule, ça me donne le nom des fonctions.
PS: dans l'editeur VBA, je consulte l'aide je tape les entrées, sorties : decimal, binaire. Ben ça marche po. :??:

Reply

Marsh Posté le 28-06-2006 à 13:14:44    

Kimilsung a écrit :

Salut,
peut-être tu peux m'aider. Pour consulter l'aide (F1) faut déjà connaître le nom de ces fonctions.  Comme je l'ai dit, je connais les formules sous excel je voudrais connaître leur équivalent en VBA. SVP ne me dites pas d'enregistrer la macro et taper ensuite la formule, ça me donne le nom des fonctions.
PS: dans l'editeur VBA, je consulte l'aide je tape les entrées, sorties : decimal, binaire. Ben ça marche po. :??:


tape DECBIN ^^

Reply

Marsh Posté le 28-06-2006 à 15:27:12    

:D S'il te plait,des remarques plus constructives. J'ai déjà consulté l'aide d'Excel et j 'ai tapé DECBIN, BINDEC, HEX ... Moi je veux leur équivalence en code VBA, c'est tout.

Message cité 1 fois
Message édité par Kimilsung le 28-06-2006 à 15:30:26
Reply

Marsh Posté le 28-06-2006 à 15:28:47    

Kimilsung a écrit :

S'il te plait,des remarques plus constructives. J'ai déjà consulté l'aide d'Excel et j 'ai tapé DECBIN,BINDEC,HEX ... Moi je veux leur équivalence en code VBA.


ce n'est pas que mes remarques ne sont pas constructives, mais je me permets de douter de l'utilité de connaitre le code VBA d'une fonction qui est déjà existante sous un nom tout fait...

Reply

Marsh Posté le 28-06-2006 à 15:58:26    

Dans Outils> Macro complémentaire il y a Utilitaire d'analyse - VBA donc forcément pour moi il doit y avoir son équivalent en VBA. Maintenant, je fais une analyse sémantique en bits sur une très longue chaine. Je me vois mal à programmer avec des formules SI(DECALER(SI(DECBIN(F12;8);; );; )..... C'est vrai que je pourrai piloter les formules par les macros mais autant le faire direct et puis ça m'obligerait à les stocker sur une feuille.
Je pense que c'est tout bête pour trouver son code. Maintenant je suis pas une bête en ce qui concerne l'aide sous VBA, alors si quelqu'un savait comment trouver ce que je cherche ....  :bounce:
En gros quand on a une formule comment on retoruve son équivalent en VBA?


Message édité par Kimilsung le 28-06-2006 à 16:02:31
Reply

Marsh Posté le 29-06-2006 à 10:21:11    


Sub EnumFonctions()
Dim Feuille As Worksheet, Tableau As Variant
Dim i As Integer, j As Integer
    Set Feuille = ActiveWorkbook.Worksheets.Add
    Tableau = Application.RegisteredFunctions
    If IsNull(Tableau) Then
        MsgBox "Pas de fonctions"
    Else
        For i = LBound(Tableau) To UBound(Tableau)
              Feuille.Cells(i, 1).Formula = Tableau(i, 2)
        Next i
    End If
    Feuille.Columns("A:C" ).AutoFit
End Sub


Message édité par kiki29 le 29-06-2006 à 11:07:46
Reply

Marsh Posté le 30-06-2006 à 10:45:40    

Merci Kiki29 exactement ce que je voulais,
j'ai le listing des fonctions. Mais leurs codes ne sont pas définies dans VBA et pourtant j'ai rechargé le fichier ANALYS32.xll. Pareil pour l'aide il reconnaît pas. :cry:  
Quelqu'un a une soluce.
Merci d'avance.

Reply

Marsh Posté le 05-07-2006 à 16:11:55    

Kimilsung a écrit :

Merci Kiki29 exactement ce que je voulais,
j'ai le listing des fonctions. Mais leurs codes ne sont pas définies dans VBA et pourtant j'ai rechargé le fichier ANALYS32.xll. Pareil pour l'aide il reconnaît pas. :cry:  
Quelqu'un a une soluce.
Merci d'avance.


un petit up

Reply

Marsh Posté le 05-07-2006 à 16:11:55   

Reply

Marsh Posté le 05-07-2006 à 16:29:49    

J'ai pas bien compris la question, mais si ce sont les conversions possibles sous VB que tu veux, ben les voilà:
 
CBool(expression)
 
CByte(expression)
 
CCur(expression)
 
CDate(expression)
 
CDbl(expression)
 
CDec(expression)
 
CInt(expression)
 
CLng(expression)
 
CSng(expression)
 
CStr(expression)
 
CVar(expression)
 


---------------
J'ai un message.."Cliquez OK pour continuer."...Qu'est ce que je fais ?
Reply

Marsh Posté le 21-08-2006 à 17:39:00    

Ah j'avais pas vu qu'on m'a répondu.
Merci JihemAir mais les fonctions que tu m'as donné convertissent une expression,string en un type choisi. Ce que je veux c pas compliqué comme jpcheck l'a répondu :  c'est des fonctions qui passent du binaire-> décimal, hexa->binaire. Un peu comme les formules
hex2dec
oct2dec
bin2dec
En fait je voulais leur équivalence en VBA. Bon tant pis j'ai pas trouvé, je me suis créé mes petites fonctions depuis le temps.  
Je me demande si il y a bijection entre les fonctions et leur équivalent vba.

Reply

Marsh Posté le 21-08-2006 à 23:39:39    

ActiveCell.FormulaR1C1 = "=Bin2Dec(101101101)"

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed