Discussion :

[amateur23]

bonsoir le forum
voila mon petit soucis j'ai un macro pour trouver les doublons dans une colonne il fonctionne très bien le petit soucis et le suivant a la fin du macro j'ai deux msgbox
je recherche comment en faire qu'un seul
voila la ou est mon problème

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
  '----- Affiche la liste et le nombre de doublons --------
For j = 1 To m
        Doublons = Doublons & Resultat(1, j) & "      -->" & _
                    Resultat(2, j) & vbCrLf
    Next j
    MsgBox "J'AI DES DOUBLONS DANS MA BASE !", vbCritical
    MsgBox Doublons
 
    Set Un = Nothing
End Sub

pouvais vous m'aidé dans sa réalisation pour en faire qu'un seul
merci pour votre aide

[anasecu]

Bonsoir,

Tu réunis tes 2 messages ainsi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox "J'AI DES DOUBLONS DANS MA BASE !" & vbLf & doublons, vbCritical

[amateur23]

MErci POUR LE MESSAGE mais il me donne que le premier smgbox et le deuxieme est vide il me donne aucun chiffre
merci quand meme
j'ai finis par trouvé désoler du dérangement
et encore merci

[Menhir]

MErci POUR LE MESSAGE mais il me donne que le premier smgbox et le deuxieme est vide il me donne aucun chiffre

Dans VBE, mets un arrêt sur la ligne du MsgBox et regarde la valeur de le variable Doublons dans la fenêtre de variables locales.
Je suis prêt à parier à 2 contre 1 qu'elle est vide.

[HopPopPop]

Bonjour à tous,

L'intervention de anasecu est correcte, sinon que la variable 'doublons" s'écrit "Doublons" avec un D majuscule.
Si l'instruction "Option Explicit" était mise au début de chaque Module et formulaire, l'erreur aurait été soulevée de suite.

[Menhir]

Si l'instruction "Option Explicit" était mise au début de chaque Module et formulaire, l'erreur aurait été soulevée de suite.

En fait l'erreur n'aurait pas été soulevée parce que VBE aurait corrigé ça tout seul.

D'ailleurs, c'est corrigé même sans Option Explicit (je viens de faire le test).

Donc, comme dirait Fox, la vérité est ailleurs.

[NVCfrm]

Discussion close depuis le poste #3

MErci POUR LE MESSAGE mais il me donne que le premier smgbox et le deuxieme est vide il me donne aucun chiffre
merci quand meme
j'ai finis par trouvé désoler du dérangement
et encore merci

Reste plus qu'à marquer résolu.

[HopPopPop]

@ Menhir,
Bon, j'en profite qu'il ne soit pas résolu à cet instant pour dire que j'aurais dû mieux réfléchir avant d'écrire mon post précédent.
Ce que tu dis est évident, mea culpa, "bon sang, mais c'est bien sûr !"
D'ailleurs, moi-même, lorsque j'écris mon code et que la ligne est validée : les variables se mettent en forme si elles sont reconnues.