Écriture Macro ou Instruction VBA
Résolu
PatPR971
Messages postés
8
Date d'inscription
Statut
Membre
Dernière intervention
-
Pierre1310 Messages postés 8854 Statut Membre -
Pierre1310 Messages postés 8854 Statut Membre -
Bonjour à tous
Je travaille sur une feuille excel avec des zones deroulantes en "contrôle de Formulaires" pour sélectionner un enregistrement d'un onglet différent sur la même feuille Excel.
Une fois sélectionnée la cellule liée me donne une valeur correspondante à la ligne de l'enregistrement. Je souhaite me positionner directement sur la ligne de cet onglet sur une colonne bien précise (C) et modifier de façon automatique en incluant une valeur (Date du jour)
Quelqu'un pourrait il me dire si cela est possible et comment ?
Merci d'avance
Patrice débutant en VBA
Je travaille sur une feuille excel avec des zones deroulantes en "contrôle de Formulaires" pour sélectionner un enregistrement d'un onglet différent sur la même feuille Excel.
Une fois sélectionnée la cellule liée me donne une valeur correspondante à la ligne de l'enregistrement. Je souhaite me positionner directement sur la ligne de cet onglet sur une colonne bien précise (C) et modifier de façon automatique en incluant une valeur (Date du jour)
Quelqu'un pourrait il me dire si cela est possible et comment ?
Merci d'avance
Patrice débutant en VBA
2 réponses
-
Bonjour à toi,
Le plus simple serait de joindre un fichier exemple.
Merci-
-
-
-
-
Bonjour,
J'ai essayé de comprendre ce que tu veux faire mais ce n'est pas très clair.
Du coup, si tu veux déclencher cette action, tu dois créer un code dans ton CommandButton et mettre un code de ce type:
Définition de la valeur de ta cellule liée dans une variable
Var1 = Sheets("Portail").Cells(?,?).Value
Déplacement dans l'onglet et dans la cellule A2
Sheets("Emprunts").Activate
Cells(2,1).Select
Tant que la cellule n'est pas égale à Var1, descendre d'une ligne
Do while not ActiveCell.Value = Var1
Selection.Offset(1,0).Select
Loop
Décalage sur la cellule de la colonne C
Selection.Offset(0,2).Select
Définition de la date du jour pour cette cellule
ActiveCell.Value = Date
-
-
Salut,
Pour utiliser une autre feuille, il faut utiliser :sheet("nom de feuille")
Après pour ligne/colonne, tout dépend de comment elle est déterminée.cells(1,2)
avec 1 pour la ligne et 2 pour la colonne.
-
Bonjour
Et avec "cells" est ce que je peux affecter directement la ligne issue de ma liste déroulante ?
Exemple : je choisis un enregistrement de mon onglet Bibliothèque, la ligne 6 par exemple, j'affiche mes éléments dans une requête INDEX et je veux par Macro directement affecter la cellule C6 pour marquer l'indisponibilité de cet ouvrage. Cette colonne dépendra donc de ma première sélection dans ma liste déroulante ... l'idéal serait de trouver une instruction pour modifier C&Cellule liée -
-
-
-
-
