Problème VBA with/end with

Résolu/Fermé

Randi123 Messages postés 2 Date d'inscription mardi 5 janvier 2021 Statut Membre Dernière intervention 5 janvier 2021 - Modifié le 5 janv. 2021 à 18:14
Randi123 Messages postés 2 Date d'inscription mardi 5 janvier 2021 Statut Membre Dernière intervention 5 janvier 2021 - 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:

Vba with end with
The requested url was rejected. please consult with your administrator. ✓ - Forum Réseaux sociaux
L'indice n'appartient pas à la sélection vba - Forum VB / VBA
End clothing avis - Forum Consommation & Internet
Girl i want to be with you ✓ - Forum Musique / Radio / Clip
Exemple planning 1 week-end sur 3 - Télécharger - Outils professionnels

3 réponses

Réponse 1 / 3

yg_be Messages postés 23526 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 14 avril 2025 Ambassadeur 1 577
5 janv. 2021 à 18:46

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