Voici ma macro qui additione un montant dans la colonne saisie même si je
l'Efface.
Dan al colonne totale, il addition les montant qui a été saisie a chaque
retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé ,
donc ça bogue a chaque fois que je saisie un montant
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonsoir. Peut-être déprotégeant la feuille le temps d'effectuer l'opération ? Cordialement. Daniel "Érico" a écrit dans le message de news: %
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface. Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
Bonsoir.
Peut-être déprotégeant la feuille le temps d'effectuer l'opération ?
Cordialement.
Daniel
"Érico" <hahaha@videotron.ca> a écrit dans le message de news:
%23foR2YcNHHA.3588@TK2MSFTNGP06.phx.gbl...
Voici ma macro qui additione un montant dans la colonne saisie même si je
l'Efface.
Dan al colonne totale, il addition les montant qui a été saisie a chaque
retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé
, donc ça bogue a chaque fois que je saisie un montant
Bonsoir. Peut-être déprotégeant la feuille le temps d'effectuer l'opération ? Cordialement. Daniel "Érico" a écrit dans le message de news: %
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface. Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
Avec la macro de Daniel, si tu entres des valeurs non numériques, il ne se passe rien dans la colonne BE (c'est mieux ainsi). J'ai ajouté ActiveSheet.Unprotect au début et ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range) ActiveSheet.Unprotect If Target.Count > 1 Then Exit Sub If Target.Column <> 56 Then Exit Sub If Not IsNumeric(Target.Value) Then Exit Sub Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value ActiveSheet.Protect End Sub
Serge
"Érico" a écrit dans le message de news: %
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface. Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
Avec la macro de Daniel, si tu entres des valeurs non numériques,
il ne se passe rien dans la colonne BE (c'est mieux ainsi).
J'ai ajouté ActiveSheet.Unprotect au début et
ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Unprotect
If Target.Count > 1 Then Exit Sub
If Target.Column <> 56 Then Exit Sub
If Not IsNumeric(Target.Value) Then Exit Sub
Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value
ActiveSheet.Protect
End Sub
Serge
"Érico" <hahaha@videotron.ca> a écrit dans le message de news: %23foR2YcNHHA.3588@TK2MSFTNGP06.phx.gbl...
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface.
Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
Avec la macro de Daniel, si tu entres des valeurs non numériques, il ne se passe rien dans la colonne BE (c'est mieux ainsi). J'ai ajouté ActiveSheet.Unprotect au début et ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range) ActiveSheet.Unprotect If Target.Count > 1 Then Exit Sub If Target.Column <> 56 Then Exit Sub If Not IsNumeric(Target.Value) Then Exit Sub Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value ActiveSheet.Protect End Sub
Serge
"Érico" a écrit dans le message de news: %
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface. Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
Sauf, j'étais obligé de rajouter le mot de passe. Le problème, si ça bogue, ils vont voir le mot de passe.
Est-il possible de ne pas voir le mot de passe?
Merci
"garnote" a écrit dans le message de news: %23fd%
Salut Érico,
Avec la macro de Daniel, si tu entres des valeurs non numériques, il ne se passe rien dans la colonne BE (c'est mieux ainsi). J'ai ajouté ActiveSheet.Unprotect au début et ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range) ActiveSheet.Unprotect If Target.Count > 1 Then Exit Sub If Target.Column <> 56 Then Exit Sub If Not IsNumeric(Target.Value) Then Exit Sub Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value ActiveSheet.Protect End Sub
Serge
"Érico" a écrit dans le message de news: %
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface. Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
Sauf, j'étais obligé de rajouter le mot de passe.
Le problème, si ça bogue, ils vont voir le mot de passe.
Est-il possible de ne pas voir le mot de passe?
Merci
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news:
%23fd%23i1cNHHA.3916@TK2MSFTNGP02.phx.gbl...
Salut Érico,
Avec la macro de Daniel, si tu entres des valeurs non numériques,
il ne se passe rien dans la colonne BE (c'est mieux ainsi).
J'ai ajouté ActiveSheet.Unprotect au début et
ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Unprotect
If Target.Count > 1 Then Exit Sub
If Target.Column <> 56 Then Exit Sub
If Not IsNumeric(Target.Value) Then Exit Sub
Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value
ActiveSheet.Protect
End Sub
Serge
"Érico" <hahaha@videotron.ca> a écrit dans le message de news:
%23foR2YcNHHA.3588@TK2MSFTNGP06.phx.gbl...
Voici ma macro qui additione un montant dans la colonne saisie même si je
l'Efface.
Dan al colonne totale, il addition les montant qui a été saisie a chaque
retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé
, donc ça bogue a chaque fois que je saisie un montant
Sauf, j'étais obligé de rajouter le mot de passe. Le problème, si ça bogue, ils vont voir le mot de passe.
Est-il possible de ne pas voir le mot de passe?
Merci
"garnote" a écrit dans le message de news: %23fd%
Salut Érico,
Avec la macro de Daniel, si tu entres des valeurs non numériques, il ne se passe rien dans la colonne BE (c'est mieux ainsi). J'ai ajouté ActiveSheet.Unprotect au début et ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range) ActiveSheet.Unprotect If Target.Count > 1 Then Exit Sub If Target.Column <> 56 Then Exit Sub If Not IsNumeric(Target.Value) Then Exit Sub Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value ActiveSheet.Protect End Sub
Serge
"Érico" a écrit dans le message de news: %
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface. Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
Tu pourrais verrouiller le projet pour l'affichage des macros. Va dans un module et clique sur : Outils / Propriétés du projet / Protection, coche "Verrouiller le projet pour l'affichage", entre un mot de passe ... N'oublie surtout pas ton mot de passe ;-)
Serge
"Érico" a écrit dans le message de news: %
ça fonctionne merci.
Sauf, j'étais obligé de rajouter le mot de passe. Le problème, si ça bogue, ils vont voir le mot de passe.
Est-il possible de ne pas voir le mot de passe?
Merci
"garnote" a écrit dans le message de news: %23fd%
Salut Érico,
Avec la macro de Daniel, si tu entres des valeurs non numériques, il ne se passe rien dans la colonne BE (c'est mieux ainsi). J'ai ajouté ActiveSheet.Unprotect au début et ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range) ActiveSheet.Unprotect If Target.Count > 1 Then Exit Sub If Target.Column <> 56 Then Exit Sub If Not IsNumeric(Target.Value) Then Exit Sub Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value ActiveSheet.Protect End Sub
Serge
"Érico" a écrit dans le message de news: %
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface. Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
Tu pourrais verrouiller le projet pour l'affichage des macros.
Va dans un module et clique sur :
Outils / Propriétés du projet / Protection,
coche "Verrouiller le projet pour l'affichage",
entre un mot de passe ...
N'oublie surtout pas ton mot de passe ;-)
Serge
"Érico" <hahaha@videotron.ca> a écrit dans le message de news: %23L3OwbnNHHA.4928@TK2MSFTNGP06.phx.gbl...
ça fonctionne merci.
Sauf, j'étais obligé de rajouter le mot de passe.
Le problème, si ça bogue, ils vont voir le mot de passe.
Est-il possible de ne pas voir le mot de passe?
Merci
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news: %23fd%23i1cNHHA.3916@TK2MSFTNGP02.phx.gbl...
Salut Érico,
Avec la macro de Daniel, si tu entres des valeurs non numériques,
il ne se passe rien dans la colonne BE (c'est mieux ainsi).
J'ai ajouté ActiveSheet.Unprotect au début et
ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Unprotect
If Target.Count > 1 Then Exit Sub
If Target.Column <> 56 Then Exit Sub
If Not IsNumeric(Target.Value) Then Exit Sub
Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value
ActiveSheet.Protect
End Sub
Serge
"Érico" <hahaha@videotron.ca> a écrit dans le message de news: %23foR2YcNHHA.3588@TK2MSFTNGP06.phx.gbl...
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface.
Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
Tu pourrais verrouiller le projet pour l'affichage des macros. Va dans un module et clique sur : Outils / Propriétés du projet / Protection, coche "Verrouiller le projet pour l'affichage", entre un mot de passe ... N'oublie surtout pas ton mot de passe ;-)
Serge
"Érico" a écrit dans le message de news: %
ça fonctionne merci.
Sauf, j'étais obligé de rajouter le mot de passe. Le problème, si ça bogue, ils vont voir le mot de passe.
Est-il possible de ne pas voir le mot de passe?
Merci
"garnote" a écrit dans le message de news: %23fd%
Salut Érico,
Avec la macro de Daniel, si tu entres des valeurs non numériques, il ne se passe rien dans la colonne BE (c'est mieux ainsi). J'ai ajouté ActiveSheet.Unprotect au début et ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range) ActiveSheet.Unprotect If Target.Count > 1 Then Exit Sub If Target.Column <> 56 Then Exit Sub If Not IsNumeric(Target.Value) Then Exit Sub Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value ActiveSheet.Protect End Sub
Serge
"Érico" a écrit dans le message de news: %
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface. Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
Une dernière chose que j'aimerais rajouter dans cette macro
Toute changement dans des cellules déterminées, de mettre en caractères rouges. (a chaque qu'on pèse sur "entrer")
Mettons de A17 à BJ33 et A96 à BJ141 et A146 à BJ166 et A172 à BJ192 et K6 à AO9
Un gros merci
Érico
"garnote" a écrit dans le message de news:
Salut Érico,
Tu pourrais verrouiller le projet pour l'affichage des macros. Va dans un module et clique sur : Outils / Propriétés du projet / Protection, coche "Verrouiller le projet pour l'affichage", entre un mot de passe ... N'oublie surtout pas ton mot de passe ;-)
Serge
"Érico" a écrit dans le message de news: %
ça fonctionne merci.
Sauf, j'étais obligé de rajouter le mot de passe. Le problème, si ça bogue, ils vont voir le mot de passe.
Est-il possible de ne pas voir le mot de passe?
Merci
"garnote" a écrit dans le message de news: %23fd%
Salut Érico,
Avec la macro de Daniel, si tu entres des valeurs non numériques, il ne se passe rien dans la colonne BE (c'est mieux ainsi). J'ai ajouté ActiveSheet.Unprotect au début et ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range) ActiveSheet.Unprotect If Target.Count > 1 Then Exit Sub If Target.Column <> 56 Then Exit Sub If Not IsNumeric(Target.Value) Then Exit Sub Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value ActiveSheet.Protect End Sub
Serge
"Érico" a écrit dans le message de news: %
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface. Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
Une dernière chose que j'aimerais rajouter dans cette macro
Toute changement dans des cellules déterminées, de mettre en caractères
rouges. (a chaque qu'on pèse sur "entrer")
Mettons de A17 à BJ33
et A96 à BJ141
et A146 à BJ166
et A172 à BJ192
et K6 à AO9
Un gros merci
Érico
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news:
OogFDknNHHA.724@TK2MSFTNGP04.phx.gbl...
Salut Érico,
Tu pourrais verrouiller le projet pour l'affichage des macros.
Va dans un module et clique sur :
Outils / Propriétés du projet / Protection,
coche "Verrouiller le projet pour l'affichage",
entre un mot de passe ...
N'oublie surtout pas ton mot de passe ;-)
Serge
"Érico" <hahaha@videotron.ca> a écrit dans le message de news:
%23L3OwbnNHHA.4928@TK2MSFTNGP06.phx.gbl...
ça fonctionne merci.
Sauf, j'étais obligé de rajouter le mot de passe.
Le problème, si ça bogue, ils vont voir le mot de passe.
Est-il possible de ne pas voir le mot de passe?
Merci
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de
news: %23fd%23i1cNHHA.3916@TK2MSFTNGP02.phx.gbl...
Salut Érico,
Avec la macro de Daniel, si tu entres des valeurs non numériques,
il ne se passe rien dans la colonne BE (c'est mieux ainsi).
J'ai ajouté ActiveSheet.Unprotect au début et
ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Unprotect
If Target.Count > 1 Then Exit Sub
If Target.Column <> 56 Then Exit Sub
If Not IsNumeric(Target.Value) Then Exit Sub
Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value
ActiveSheet.Protect
End Sub
Serge
"Érico" <hahaha@videotron.ca> a écrit dans le message de news:
%23foR2YcNHHA.3588@TK2MSFTNGP06.phx.gbl...
Voici ma macro qui additione un montant dans la colonne saisie même si
je l'Efface.
Dan al colonne totale, il addition les montant qui a été saisie a
chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est
protégé , donc ça bogue a chaque fois que je saisie un montant
Une dernière chose que j'aimerais rajouter dans cette macro
Toute changement dans des cellules déterminées, de mettre en caractères rouges. (a chaque qu'on pèse sur "entrer")
Mettons de A17 à BJ33 et A96 à BJ141 et A146 à BJ166 et A172 à BJ192 et K6 à AO9
Un gros merci
Érico
"garnote" a écrit dans le message de news:
Salut Érico,
Tu pourrais verrouiller le projet pour l'affichage des macros. Va dans un module et clique sur : Outils / Propriétés du projet / Protection, coche "Verrouiller le projet pour l'affichage", entre un mot de passe ... N'oublie surtout pas ton mot de passe ;-)
Serge
"Érico" a écrit dans le message de news: %
ça fonctionne merci.
Sauf, j'étais obligé de rajouter le mot de passe. Le problème, si ça bogue, ils vont voir le mot de passe.
Est-il possible de ne pas voir le mot de passe?
Merci
"garnote" a écrit dans le message de news: %23fd%
Salut Érico,
Avec la macro de Daniel, si tu entres des valeurs non numériques, il ne se passe rien dans la colonne BE (c'est mieux ainsi). J'ai ajouté ActiveSheet.Unprotect au début et ActiveSheet.Protect à la fin.
Private Sub Worksheet_Change(ByVal Target As Range) ActiveSheet.Unprotect If Target.Count > 1 Then Exit Sub If Target.Column <> 56 Then Exit Sub If Not IsNumeric(Target.Value) Then Exit Sub Target.Offset(0, 1).Value = Target.Offset(0, 1).Value + Target.Value ActiveSheet.Protect End Sub
Serge
"Érico" a écrit dans le message de news: %
Voici ma macro qui additione un montant dans la colonne saisie même si je l'Efface. Dan al colonne totale, il addition les montant qui a été saisie a chaque retour de chariot
Le problème, ma colonne de droite où il y a de l'addition, il est protégé , donc ça bogue a chaque fois que je saisie un montant
