OVH Cloud OVH Cloud

copie de cellule

3 réponses
Avatar
rico34
Bonjour,

Existe t-il un moyen de pouvoir copier une cellule numérique à base 10 en
une cellule numérique à base 2, base 8, base 16.
Exemple :
J'ai dans une cellule la valeur 1 et je souhaite la copier dans les cellules
suivantes avec les valeurs de 1 à 100.
Idem avec des valeurs binaires, octales, héxadécimales.

Merci

3 réponses

Avatar
Garette
Bonjour,

Il existe des fonctions de conversion Hexa, binaire, Dec etc ... telle que
Þc2Bin()
Elles sont disponibles en installant Outils/Macro complementaire/ Utilitaire
d'analyse

Par exemple :
10 en A1 (decimal)
Þc2Bin(A1) en A2
donne 1010 à l'affichage.
Avatar
FxM
Bonjour,

Jette un oeil à chbase(...)
site : xcell05.free.fr
macro complémentaire : morefunc.xll

@+
FxM



Bonjour,

Existe t-il un moyen de pouvoir copier une cellule numérique à base 10 en
une cellule numérique à base 2, base 8, base 16.
Exemple :
J'ai dans une cellule la valeur 1 et je souhaite la copier dans les cellules
suivantes avec les valeurs de 1 à 100.
Idem avec des valeurs binaires, octales, héxadécimales.

Merci


Avatar
JB
Bonjour,

Convertit un nb décimal en base 2,3,..,36

http://cjoint.com/?lpnU2qJMy3

Function Base(b, n)
Do While n >= b
result = Mid("0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ", IIf(n Mod b >
0, (n Mod b) + 1, 1), 1) & result
n = n b
Loop
Base = Mid("0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ", IIf(n Mod b > 0,
(n Mod b) + 1, 1), 1) & result
End Function

Sub essai()
x = 73
MsgBox Base(36, x)
End Sub

Dans le tableur:

ºse(36;A2)


Bonjour,

Il existe des fonctions de conversion Hexa, binaire, Dec etc ... telle que
Þc2Bin()
Elles sont disponibles en installant Outils/Macro complementaire/ Utilita ire
d'analyse

Par exemple :
10 en A1 (decimal)
Þc2Bin(A1) en A2
donne 1010 à l'affichage.