Comment utiliser une plage avec une rangée et une colonne variables avec Excel VBA ?

  • Partage Ça
Hugh West

C'est une perte de temps lorsque vous voulez formater des cellules par sélection et travailler avec des données volumineuses en même temps. VBA Dans ce tutoriel, nous allons vous montrer comment utiliser le programme ligne de variable et colonne variable dans une gamme avec Excel VBA .

Télécharger le cahier d'exercices

Téléchargez ce cahier d'exercices pour vous entraîner pendant que vous lisez cet article.

Variable Row and Column avec VBA.xlsm

5 façons appropriées d'utiliser une plage avec une rangée et une colonne variables avec Excel VBA

Dans la section suivante, nous allons démontrer 5 des moyens de créer rangées de variables et colonnes En outre, nous vous montrerons comment les utiliser pour formater ou appliquer toute personnalisation à l'écran. gamme variable Un exemple d'ensemble de données est représenté dans l'image ci-dessous pour utiliser la tâche.

1. formater une plage spécifique en appliquant une rangée de variables avec Excel VBA

Disons que nous voulons sélectionner une gamme variable en demandant un numéro de ligne de la variable Nous sélectionnerons la gamme B5:C10 et appliquer le couleur de la police ( Marron Pour ce faire, suivez les étapes simples ci-dessous.

♠ Étape 1 : créer un module VBA

  • Tout d'abord, appuyez sur Alt + F11 pour lancer le Macro VBA .
  • Cliquez sur sur le Insérer.
  • Ensuite, sélectionnez Module .

♠ Étape 2 : écrire un code VBA

  • Écrivez ce qui suit Codes VBA.
 Sub Variable_row_Select() 'déclarer une variable pour le numéro de ligne Dim Row_Number As Integer 'Entrer dans une boîte de saisie, taper 10 pour le numéro de ligne Row_Number = InputBox("Tapez le numéro de ligne") 'Insérer la variable 'row_num' pour sélectionner les 5 premières lignes contenant des données Sheets("Sheet1").Range(Cells(5, 2), Cells(Row_Number, 3)).Select End Sub 

♠ Étape 3 : Exécuter le programme

  • Tout d'abord, sauver le programme et appuyez sur F5 pour courir.
  • Par conséquent, le Boîte de saisie apparaît, et tapez 10 comme le numéro de rang .

  • Enfin, appuyez sur Entrez pour voir que le gamme avec ( Rangée 5 , Colonne 2 ) à ( Variable Row 10 , Colonne 3 ) sera sélectionné .

♠ Étape 4 : Appliquer la couleur de la police à la plage

  • Pour ajouter couleur de la police dans la zone sélectionnée gamme coller le texte suivant Codes VBA .
 Sub Variable_row_Font() 'Déclarer une variable pour le numéro de ligne Dim Row_Number As Integer 'Entrer dans une boîte de saisie, taper 10 pour le numéro de ligne Row_Number = InputBox("Tapez le numéro de ligne") 'Insérer la variable 'row_num' pour sélectionner les 6 premières lignes contenant des données Sheets("Sheet1").Range(Cells(5, 2), Cells(Row_Number, 3)).Select 'Entrer une couleur pour la police en Maroon With Selection .Font.Color = RGB(128, 0, 0)End With End Sub 

♠ Étape 5 : Tapez un numéro de rangée

  • Type a numéro de rang ( 10 ) dans le Boîte de saisie .
  • Cliquez sur OK .

  • Par conséquent, le gamme choisie sera coloré comme le montre l'image ci-dessous.

Lire la suite : Comment utiliser VBA pour définir une variable de plage à sélectionner dans Excel (5 méthodes)

2. personnaliser une plage dynamique en appliquant une rangée variable avec Excel VBA

Lorsque la plage utilisée est si grande qu'il est impossible de différencier le numéro de ligne, vous pouvez avoir besoin d'utiliser la fonction dernière ligne utilisée comme votre ligne de variable Pour ce faire, suivez les étapes décrites ci-dessous.

♠ Étape 1 : Entrer un code VBA

  • Sélectionnez une nouvelle Module de la Insérer
  • Dans le nouveau Module , écrire les éléments suivants Programme VBA .
 Sub Variable_Dynamic_Row() 'déclare une variable pour le numéro de ligne Dim Last_Used_Row As Integer 'définit la variable pour la plage utilisée Last_Used_Row = Worksheets("Sheet2").UsedRange.Rows.Count 'applique la variable pour sélectionner la dernière ligne actuelle dans la plage Sheets("Sheet2").Range(Cells(5, 2), Cells(Last_Used_Row, 5)).Select End Sub 

♠ Étape 2 : Obtenir la sélection

  • Après avoir exécuté le programme, votre gamme sera sélectionné jusqu'à votre dernière utilisation rang.

♠ Étape 3 : appliquer une couleur de police

  • A marque le site gamme choisie ou à modifier , pâte les éléments suivants Codes VBA .
 Sub Variable_Dynamic_Row() 'declare a variable for row number Dim Last_Used_Row As Integer 'define variable to the used range Last_Used_Row = Worksheets("Sheet2").UsedRange.Rows.Count 'apply the variable to select current last row in the range Sheets("Sheet2").Range(Cells(5, 2), Cells(Last_Used_Row, 5)).Select With Selection .Font.Color = RGB(128, 0, 0) End With End Sub 

♠ Étape 4 : Résultat final

  • Enfin, sauver le programme et exécuter en appuyant sur F5 .
  • Par conséquent, la gamme avec votre dernière ligne utilisée est formaté avec de la couleur.

Lire la suite : Excel VBA : copier une plage dynamique dans un autre classeur

Lectures similaires

  • Comment utiliser le VBA pour chaque ligne d'une plage dans Excel ?
  • VBA pour parcourir en boucle les lignes et les colonnes d'une plage dans Excel (5 exemples)
  • Excel VBA pour parcourir une plage en boucle jusqu'à la cellule vide (4 exemples)
  • Comment convertir une plage en tableau dans Excel VBA (3 façons)
  • Comment utiliser VBA pour sélectionner une plage à partir de la cellule active dans Excel (3 méthodes)

3. formater une plage spécifique en appliquant une colonne variable avec Excel VBA

Similaire à rangées de variables vous pouvez postuler colonnes variables avec Excel VBA . B5 ( Rangée 5 , Colonne 2 ) est la cellule première cellule dans le gamme, et Rangée 8 est le dernier rang dans la gamme ; la dernière colonne est le colonne variable Suivez les procédures ci-dessous pour appliquer le colonne variable .

♠ Étape 1 : écrire un code VBA

  • Dans un nouveau Module , écrire les éléments suivants Code VBA .
 Sub Variable_Column_Font() 'Déclarer une variable pour le numéro de ligne Dim Column_num As Integer 'Entrer dans une boîte de saisie, tapez 5 pour le numéro de colonne Column_num = InputBox("Tapez le numéro de colonne") 'Insérer la variable 'Column_num' pour sélectionner les 5 premières colonnes contenant des données Sheets("Sheet3").Range(Cells(5, 2), Cells(8, Column_num)).Select 'Entrer une couleur pour la police en Maroon With Selection .Font.Color =RGB(128, 0, 0) End With End Sub 

♠ Étape 2 : Exécuter le programme

  • A exécuter le programme, appuyez sur F5 après sauver .
  • Par conséquent, vous verrez les résultats suivants comme votre cellules sélectionnées sont la gamme B5:E8 .

4. personnaliser une plage dynamique en appliquant une colonne variable avec Excel VBA

En plus de la précédente, vous pouvez personnaliser l'option colonne variable à exécuter de manière dynamique. augmentation de données dans un colonne qui ajouter à la sélection Pour ce faire, suivez les instructions simples ci-dessous.

♠ Étape 1 : Coller un code VBA

  • Pâte les éléments suivants VBA dans un nouveau Module .
 Sub Variable_Dynamic_Column() 'déclarer une variable pour le numéro de colonne Dim lastColumn As Integer 'définir la variable pour la plage utilisée lastColumn = Worksheets("Sheet4").UsedRange.Columns.Count 'appliquer la variable pour sélectionner la dernière colonne courante dans la plage Sheets("Sheet4").Range(Cells(5, 2), Cells(8, lastColumn)).Select 'colorer la police des cellules sélectionnées en Maroon With Selection .Font.Color = RGB(128, 0,0) End With End Sub 

♠ Étape 2 : Exécuter le programme

  • Tout d'abord, sauver le programme et appuyez sur F5 pour courir.
  • En conséquence, la plage est sélectionnée et formatée jusqu'à la valeur dernière colonne utilisée dans la feuille de travail.

Lire la suite : Macro Excel : trier plusieurs colonnes avec une plage dynamique (4 méthodes)

Créer une plage avec une ligne variable et une colonne variable avec Excel VBA

Il est important de noter que vous pouvez utiliser à la fois rangées de variables et colonnes variables par une sélection de votre choix. La première cellule de notre sélection de plage est B5 ( Rangée 5, Colonne 2 ) et la dernière gamme variera en fonction de notre sélection. Suivez les étapes décrites ci-dessous pour accomplir la tâche.

♠ Étape 1 : Taper un code VBA

  • Tout d'abord, créer une nouvelle Module .
  • Ensuite, écrire les éléments suivants Codes VBA .
 Sub Variable_Column_Row() 'déclarer une variable pour le numéro de ligne Dim Row_Number As Integer 'déclarer une variable pour le numéro de colonne Dim Column_num As Integer 'définir les variables - tapez 8 pour le numéro de ligne et 4 pour la colonne Row_Number = InputBox("Tapez le numéro de ligne") Column_num = InputBox("Tapez le numéro de colonne") 'appliquer la variable pour sélectionner les lignes et les colonnes dans la plage Sheets("Sheet5").Range(Cells(5, 2),Cells(Row_Number, Column_num)).Select With Selection .Font.Color = RGB(128, 0, 0) End With End Sub 

♠ Étape 2 : Insérer le numéro de ligne

  • Type tout numéro de rang .

♠ Étape 3 : Insérer le numéro de colonne

  • Type tout numéro de colonne .

♠ Étape 4 : Obtenir les résultats finaux

  • Par conséquent, lorsque vous sélectionnez ( Rangée , Colonne ) = ( 8,5 ), vous obtiendrez le résultat final comme indiqué dans l'image ci-dessous.

Conclusion

Enfin, j'espère que vous comprenez maintenant comment utiliser une plage avec des lignes et des colonnes variables avec la fonction Excel VBA Toutes ces stratégies doivent être mises en œuvre lors de l'éducation et de la pratique de vos données. Examinez le livre de pratique et appliquez ce que vous avez appris. C'est grâce à votre généreux soutien que nous pouvons continuer à offrir des programmes comme celui-ci.

Si vous avez des questions, n'hésitez pas à nous contacter et à partager vos réflexions dans la section des commentaires ci-dessous.

Le site Exceldemy vous répondra dans les plus brefs délais.

Restez avec nous et continuez à apprendre.

Hugh West est un formateur et analyste Excel très expérimenté avec plus de 10 ans d'expérience dans l'industrie. Il est titulaire d'un baccalauréat en comptabilité et finance et d'une maîtrise en administration des affaires. Hugh a une passion pour l'enseignement et a développé une approche pédagogique unique qui est facile à suivre et à comprendre. Sa connaissance approfondie d'Excel a aidé des milliers d'étudiants et de professionnels du monde entier à améliorer leurs compétences et à exceller dans leur carrière. Grâce à son blog, Hugh partage ses connaissances avec le monde, offrant des tutoriels Excel gratuits et une formation en ligne pour aider les particuliers et les entreprises à atteindre leur plein potentiel.