VBA ou macro qui ne marche pas !
RésoluValerie54001 Messages postés 135 Date d'inscription Statut Membre Dernière intervention -
- VBA ou macro qui ne marche pas !
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Jitbit macro recorder - Télécharger - Confidentialité
- Télécharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Macro word - Guide
- Excel compter cellule couleur sans vba - Guide
2 réponses
bonjour,
Merci de ne pas mettre trop de points d'exclamation, cela ne facilite nullement la lecture du texte.
C'est quoi, "une sélection automatique"?
Commence par décrire ce que tu fais pour faire "fonctionner" ton fichier, puis à quel moment il arrête de fonctionner
Je vois que ton fichier contient du code VBA. L'as-tu écrit? Le comprends-tu?
Bonjour yg_be,
C'est des données que je récupéres de livescore.fr HeadtoHead dans un match
Je peux te montrer mon chemin en modifiant le ficher excel originel en y intégrant des screens.
Non, il a toujours fait ça pour '' DVK'' et je pensais que c'était correct sur les 2 autres.
Mais après un contrôle , j'ai pu voir que les valeurs H2 et H3 n'etaient pas correctes.
Je cherche la ligne VBA ou la macro cachée qui charge H2 et H3 en ''DVK''.
Une idée?
Problème résolu.
Effectivement j'avais cela :
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Variant
Dim WS As Worksheet
Dim VF As Boolean
With Sheets("DVK")
For i = 1 To 3
.Shapes("Case d'Option A" & i).ControlFormat = False 'RAZ
Next
i = Application.Match([H2], Array("X", "Y", "NUL"), 0)
If IsNumeric(i) Then .Shapes("Case d'Option A" & i).ControlFormat = True
For i = 4 To 6
.Shapes("Case d'Option B" & i).ControlFormat = False 'RAZ
Next
i = Application.Match([H3], Array("X", "Y", "NUL"), 0)
If IsNumeric(i) Then .Shapes("Case d'Option B" & i + 3).ControlFormat = True
End With
J'ai simplement fait 2 copier coller en changeant DVK en DVKO1 et DVKO2.
J'avais regardé partout. Merci yg_be de m'avoir donner cette lumiére.
Bonsoir,
Désolé pour les points d'exclamation.
J'ai décris par '' sélection automatique ''
C'est que la valeur de la cellule H2 ( dans '' DATAS'' ) soit 'X'' se reportent dans l'onglet '' DVK '' dans la Règle 1.
Pareil pour la valeur de la cellule H3 ( dans '' DATAS'' ) ''Y'' se reportent dans l'onglet '' DVK '' dans la Règle 2.
Cela marche que sur cet onglet ; '' DVK ''
Il fonctionne lorsque je drop des données dans '' DATAS'' dans la Cellule A25,
Il termine à l'onglet '' Général'' après avoir reporté les résultats sous chaque onglet.
Je comprends presque le code VBA en place, la personne qui l'amis en place n'est plus de ce monde.
N'hésitez pas à me poser vos questions yg_be
Tu n'expliques pas quelle données mettre en A25.
Il me semble que ton code fonctionne bien. Comme il est écrit, il ne s'occupe de mettre à jour les "règles" que dans l'onglet "DVK".
Il faisait autrement avant que tu le modifies?