Code a 2 fonctions

Bonsoir le forum

cliquer sur créer nouvelle reference

j'ai une macro qui fonctionne comme je voulais (validation) valider_nouvelle_donnée

sur emplacement je tape I5A (Exemple)

sur reference je tape 5000

sur operation je tape 50

sur designation je clique sur carrure ou fond ou cercle comme je veux

avec mon ancienne macro ok jusqu'à la

je veux rajouter un commentaire en cliquant sur commentaire

je modifie ma macro

ok ca fonctionne

mais si je ne veux pas mettre de commentaire sa bloque

ps je joins un fichier

merci par avance

aiglon74

6essai118.xlsm (131.95 Ko)

Bonsoir

A tester

Modifie ton code

Sub valider_nouvelle_donnée()

Dim nd(4), I%, fin&
  With ActiveSheet
    For I = 0 To 4
      nd(I) = .Cells(8, (I + 1) * 2).Value
      If nd(I) = ""And I < 4 Then
        MsgBox .Cells(6, (I + 1) * 2).Value & " manquante.", vbInformation, "Erreur nouvelle donnée"
        Exit Sub
      End If
    Next I
  End With

Bonsoir Banzai64

je viens de teste ta modification

super pour moi

milles merci

aiglon74

Rechercher des sujets similaires à "code fonctions"