Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Bonjour à vous deux !
Je n'ai pas réussi à adapter ton code au mien.
En revanche j'ai fait ceci :
For i = 1 To 18
If Me.Controls("DateBox" & i).Visible = True Then
If IsDate(Me.Controls("DateBox" & i)) Then
.Cells(L, i + 144) =...
Bonjour à tous,
Le code joint me sert pour incrémenter des dates dans différentes cellules de mon fichier.
Une fois saisies dans le UF puis validées, la mise à jour se fait et les dates vont bien dans leurs cellules respectives.
Dim Ws As Worksheet
'RAZ
Private Sub CommandButton4_Click()...
Effectivement, sur le ficher « exemple » que j’avais envoyé cela fonctionne.
En revanche pas sur mon fichier de travail avec beaucoup plus de colonnes.
J’ai donc remplacé « Max » par « 9^9* » et maintenant tout fonctionne :)
Bonjour,
J’ai une nouvelle problématique... :)
Si par exemple le responsable (colonne I) est absent, le directeur peut quand même viser la commande. Je ne doit donc rien mettre dans la case du responsable et mettre la date directement dans la case du directeur.
Si cette date est supérieure au...
Bonjour,
Je souhaiterais avoir une formule me permettant de reporter automatiquement les données d’une cellule vers une autre en fonction de l’evolution (Date du visa) des signataires de la commande.
Si possible en reprenant la mise en forme.
Merci d’avance
Cordialement,
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.