VBA Excel 365 : Range.Resize

Résolu/Fermé
mikel831 Messages postés 208 Date d'inscription mardi 23 octobre 2012 Statut Membre Dernière intervention 8 avril 2025 - 13 avril 2024 à 10:50
Bruno83200_6929 Messages postés 283 Date d'inscription jeudi 18 juin 2020 Statut Membre Dernière intervention 23 octobre 2024 - 13 avril 2024 à 14:28

Bonjour à tous!
Ce simple bout de code bugue, et je ne trouve pas mon erreur ...
MaPlage , Reunion As Range
Set MaPlage = Range(Reunion).Resize(20, 9)

???


Windows / Chrome 123.0.0.0

A voir également:

1 réponse

Réponse 1 / 1
Bruno83200_6929 Messages postés 283 Date d'inscription jeudi 18 juin 2020 Statut Membre Dernière intervention 23 octobre 2024 57
13 avril 2024 à 14:00

Bonjour,

C'est normal que cela ne fonctionne pas. La variable Reunion n'est pas définie, et vous essayez de l'utiliser comme argument pour la fonction Range. Vous devez définir la plage que vous souhaitez redimensionner dans la variable Reunion.

Set Reunion = Range("A1:I1") (Par exemple, ajustez la plage selon vos besoins)

et ce avant de redimensionner la plage dans le code.
1
mikel831 Messages postés 208 Date d'inscription mardi 23 octobre 2012 Statut Membre Dernière intervention 8 avril 2025 16
13 avril 2024 à 14:16

Merci pour ta réponse!
En fait, le range Reunion est défini plus haut dans mon code.
De toute façon, si je fais:
Sub Bout_de_Code()
Dim MaPlage, Reunion As Range
Set Reunion = Range("A1:I1")
'MsgBox Reunion.Address
'Stop
Set MaPlage = Range(Reunion).Resize(20, 9)
End Sub
ça bugue toujours sur le resize ...???

0
Bruno83200_6929 Messages postés 283 Date d'inscription jeudi 18 juin 2020 Statut Membre Dernière intervention 23 octobre 2024 57 > mikel831 Messages postés 208 Date d'inscription mardi 23 octobre 2012 Statut Membre Dernière intervention 8 avril 2025
13 avril 2024 à 14:28

Oui, mais ça ne peut pas fonctionner. Pourquoi SetMaPlage = Range(Reunion),Resize (20,9)

Essayez plutôt comme ça

:Set MaPlage = Reunion.Resize(20, 9)

On le sait que vous voulez utiliser Reunion pour le fonction Range, ce n'est pas nécessaire de surcharger. En plus ca créer un bug.

1

Discussions similaires

"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

Bonjour,
Nous avons un problème dans la programmation de notre VBA. Voici notre programme:

Sub Bloucle1Bull()
Dim a, k As Integer

k = 2
Do While Worksheets("formulaire").Cells(2, 2) Worksheets("formulaire").Cells(k, 4)
k = k + 1
Loop


a = 2
Do While Worksheets("formulaire").Cells(k + 1, 4) Worksheets("BDD Call").Cells(a, 1) Or (Worksheets("BDD Call").Cells(a, 4) = (Worksheets("Bullspread").Cells(2, 3) + 100)) Or Worksheets("BDD Call").Cells(a, 7) Worksheets("bullspread").Cells(2, 7)
a = a + 1
Loop

''''''''''''on recopie la ligne du premier call trouvé pour le jour 2 ...

2 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

Bonjour,

Je ne comprend pas pourquoi j'ai une erreur d'execution 13 : incompatibilité de type car mon code marchait très bien avant...Je met en gras la ligne où il y a l'erreur


'affichage des feuilles concernées et vérification des champs Sheets("Recap").Visible = True If Cathégories = "" Then MsgBox "Sélectionnez une catégorie de défauts dans la liste déroulante" ElseIf défauts = "" Then MsgBox "Sélectionnez un défauts qualité dans la liste déroulante" Exit Sub End If Dim i As Integer Dim n As Integer n = 3 i = 2 MsgBox "Veuillez patienter pendant le traitement..." Application.Cursor = xlWait 'affiche le sablier 'Suppression des don...

5 réponses
Méthode find dans VBA - Recherche de données sous Excel
baissaoui -
baissaoui -

Document initial créé par Pijaku

Cette fiche pratique est essentiellement tirée de l'aide Excel. L'exemple d'utilisation est un conseil basé sur ma propre petite expérience.

Introduction Méthode via Excel Code VBA correspondant Syntaxe Valeur renvoyée A savoir Exemple d'utilisation Recherche multiple FindNext - FindPrevious Une variante : Find_Next FindAll


Introduction La méthode find permet de trouver la première occurrence d'une information spécifique, dans un range. En clair, cette méthode permet d'aller chercher dans une feuille ou une partie d'une feuille Excel, une information, une donnée ou une partie de cette donnée. ...

0 réponse
ouverture d'un fichier excel à partir d'un code VBA
TraderAS -
pijaku -

Bonjour,

je souhaite ouvrir un fichier excel à partir du code suivant:

Sub Ouvrir()
Workbooks.Open Filename:="C:\Documents and Settings\Administrateur\Bureau\TRADING\Action.xlsx"
End Sub

sauf que lors de l'exécution j'ai cette erreur
==> Instruction incorrecte à l'extérieur d'une procédure et il met en bleu cette partie :
C:\Documents and Settings\Administrateur\Bureau\TRADING\Action.xlsx

merci

3 réponses
appliquer une pause dans une macro vba excel
ch'duj -
lerif25 -

Bonjour,

Je cherche comment faire stopper de quelques secondes le déroulement de ma macro en vba excel et ceci de maniere invisible pour l'utilisateur.
Si quelqu'un à un bout de code ça serait sympa !!!

je suis en vba excel 2007

merci

Configuration: Windows XP / Internet Explorer 7.0

10 réponses