Macro sur excel

Fermé
hazoum_88 Messages postés 3 Date d'inscription lundi 24 novembre 2008 Statut Membre Dernière intervention 25 novembre 2008 - 24 nov. 2008 à 17:36
hazoum_88 Messages postés 3 Date d'inscription lundi 24 novembre 2008 Statut Membre Dernière intervention 25 novembre 2008 - 25 nov. 2008 à 17:13
Bonjour,
mer6 d'avance mes amis,
j'ai une base de donnée sur excel et elle partagé, tout le monde a le droit d'y accedé et d'ajouté et modifier les informations et mon problème est la suivante:
je veux crée une macro qui me permet d'avoir un numéro quelque soit la forme dont il été ecrit
exemple:
je peu ecrire le numéro de cette façon 12-258-123 ou 12/123/456 ou 12 123 456 ou 12123456 il ya plusieur façon d'ecrire un numéro de telephone et moi je veux une macro qui peut etre capable de m'affiché le numéro demandé.
j'éspère que j'étais clair dans mon explppication et mer6 encore.

2 réponses

wilfried_42 Messages postés 907 Date d'inscription mardi 19 août 2008 Statut Contributeur Dernière intervention 8 décembre 2009 244
24 nov. 2008 à 18:24
Bonjour

Voici une fonction personsalisée qui te permet de recuperer tous les chiffres d'une chaine
à placer dans un module

Function get_num(machaine as string) as string
dim i as integer
application.volatile
get_num = ""
if len(machaine)>0 then
for i = 1 to len(machaine)
if instr("0123456789", mid(machaine,i,1))>0 then get_num = get_num & mid(machaine,i,1)
next i
end if
end function

utilisation
en tant que formule sur feuille :
=Get_num(A1)

en tant que fonction vba
Montel = get_num(Range("A1").value)
1
hazoum_88 Messages postés 3 Date d'inscription lundi 24 novembre 2008 Statut Membre Dernière intervention 25 novembre 2008
25 nov. 2008 à 17:11
mer6 bi1 c utile !!!!!!!!!!!!!
0
paglop !!! Messages postés 635 Date d'inscription jeudi 24 avril 2008 Statut Membre Dernière intervention 3 novembre 2015 234
24 nov. 2008 à 18:15
Oo base de donné et excel ?? Acces est un logiciel de base de donné excel est un tableur !


Tu crée un bouton sur ta feuille auquel tu lui affecte une macro

Sub nommacro()
form_nomform.Show
End Sub

Cree une nouvelle form


Il faut développé du code VBA
voir aide sur internet

Range("cellule") pour les cellules
0
hazoum_88 Messages postés 3 Date d'inscription lundi 24 novembre 2008 Statut Membre Dernière intervention 25 novembre 2008
25 nov. 2008 à 17:13
mer6 pour votre aide ^^
0