Problème VBA with/end with

Résolu

Randi123 Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
Randi123 Messages postés 2 Date d'inscription Statut Membre Dernière intervention - 5 janv. 2021 à 19:52

Bonjour,

Je suis débutant à VBA
En utilisant With /end with je suis sensé pouvoir remplacer

Sub a()
Selection.font.Size=30
Sélection.font.Name=« Arial »
End sub

Par

Sub a()
With Selection.font
Size=30
Name=« Arial »
End with
End sub

Le problème est quand j utilise with/end with, c est le nom de ma feuille qui se change en Arial tandis que lorsque j utilise juste Sélection.font c est bien le texte dans la cellule qui change et nom le nom de la feuille

Cela fait 2 h que je suis bloqué la dessus . Pouvez vous m aider ?

Par avance merci

Configuration: iPhone / Chrome 87.0.4280.77

A voir également:

With end with vba
Girl i want to be with you ✓ - Forum Musique / Radio / Clip
End clothing avis - Forum Consommation & Internet
Exemple planning 1 week-end sur 3 - Télécharger - Outils professionnels
Error: subprocess-exited-with-error - Forum Python
L'indice n'appartient pas à la sélection vba - Forum VB / VBA

3 réponses

Réponse 1 / 3

yg_be Messages postés 23541 Date d'inscription Statut Contributeur Dernière intervention Ambassadeur 1 584

bonjour,
je suis étonné que le nom de la feuille change.
as-tu bien

Option Explicit

en première ligne de ton module?

lecture utile: https://docs.microsoft.com/fr-ch/dotnet/visual-basic/language-reference/statements/with-end-with-statement

Discussions similaires

boucle tant que cellule non vide

Envoi plage cellules corps mail

Si cellule d'autre feuille contient texte, alors... VBA

Erreur exécution 13 : incompatibilité de type

Supprimer module vba

Récupérer les noms des fichiers présents dans un dossier

Votre réponse

Discussions similaires