Ce navigateur n’est plus pris en charge.
Effectuez une mise à niveau vers Microsoft Edge pour tirer parti des dernières fonctionnalités, des mises à jour de sécurité et du support technique.
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(128, 8%, 22%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3EA%3C/text%3E%3C/svg%3E)
Bonjour
J'ai une cellule qui contient un Non ou un Oui (format standard) sélectionné via une liste déroulante.
Je souhaite lire la valeur de cette cellule via un code VBA
J'utilise donc
val = ThisWorksheet.Cells(1,2).Value
Mais à l'éxécution j'obtiens une erreur 'erreur définie par l'application ou par l'objet".
J'ai essayé en déclarant val de plusieurs façons sans succès
Quel est le problème ?
Merci pour votre aide
Bernard
Famille de feuilles de calcul Microsoft avec des outils pour l’analyse, le graphique et la communication des données.
Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(108.80000000000001, 78%, 20%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3ED%3C/text%3E%3C/svg%3E)
Bonjour,
"ThisWorkSheet" n'existe pas. S'il s'agit de la feuille active, mets seulement :
Cells(1,2).Value
Si tu tiens à référencer le classeur contenant la macro :
ThisWorkbook.Sheets("nom").Cells(1,2).Value
Cordialement.
Daniel