KutoolsforOffice — Une solution unique, cinq outils puissants.Faire plus avec moins d'efforts.Soldes de mars : 20 % de réduction

Comment insérer un nombre précis de colonnes à intervalles réguliers dans Excel ?

AuteurZhoumandy Date de modification

Lors de votre utilisation quotidienne d’Excel, il peut vous arriver de devoir ajouter davantage de colonnes entre des colonnes existantes. Bien sûr, vous pouvez insérer les colonnes une par une à l’aide de la fonction Insérer. Toutefois, lorsque vous travaillez avec un grand volume de données et que vous devez insérer trois colonnes après chaque deuxième ou nième colonne, la fonction Insérer n’est manifestement pas efficace. Alors, comment accomplir rapidement cette tâche ? Dans ce tutoriel, nous aborderons deux méthodes simples pour résoudre ce problème.

Utilisez du code VBA pour insérer un nombre spécifique de Colonnes vides dans Plage de données à intervalles réguliers

Utilisez Kutools pour Excel pour insérer un nombre spécifique de Colonnes vides dans Plage de données à intervalles réguliers


Utilisez du code VBA pour insérer un nombre spécifique de Colonnes vides dans Plage de données à intervalles réguliers

Nous pouvons utiliser la macro VBA ci-dessous pour insérer un nombre spécifique de colonnes vides après chaque nième colonne. Voici la procédure à suivre.

1. Appuyez sur les touches « Alt + F11 » dans Excel pour ouvrir la fenêtre « Microsoft Visual Basic pour Applications ».

2. Cliquez sur « Insertion » > « Module », puis collez la macro suivante dans la fenêtre « Module ».

Sub InsertColumnsAtIntervals()
'Updateby Extendoffice
Dim Rng As Range
Dim xInterval As Integer
Dim xColumns As Integer
Dim xColumnsCount As Integer
Dim xNum1 As Integer
Dim xNum2 As Integer
Dim WorkRng As Range
Dim xWs As Worksheet
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xColumnsCount = WorkRng.Columns.Count
xInterval = Application.InputBox("Enter column interval. ", xTitleId, 1, Type:=1)
xColumns = Application.InputBox("How many columns to insert at each interval? ", xTitleId, 1, Type:=1)
xNum1 = WorkRng.Column + xInterval
xNum2 = xColumns + xInterval
Set xWs = WorkRng.Parent
For i = 1 To Int(xColumnsCount / xInterval)
    xWs.Range(xWs.Cells(WorkRng.Row, xNum1), xWs.Cells(WorkRng.Row, xNum1 + xColumns - 1)).Select
   Application.Selection.EntireColumn.Insert
    xNum1 = xNum1 + xNum2
Next
End Sub

3. Appuyez sur la touche « F5 » pour exécuter ce code. Une boîte de dialogue s’ouvre alors, vous invitant à sélectionner la « Plage de données » dans laquelle vous souhaitez insérer des colonnes vides.
Capture d’écran affichant une invite pour sélectionner une plage de données dans Excel lors de l’utilisation de VBA pour insérer des colonnes

4. Cliquez sur le bouton « OK ». Une autre boîte de dialogue s’affiche : saisissez le nombre d’intervalles entre les colonnes dans le champ « Saisissez l’intervalle entre les colonnes ».
Capture d’écran affichant une invite demandant l’intervalle de colonnes dans le code VBA pour insérer des colonnes dans Excel

5. Cliquez de nouveau sur le bouton « OK ». Une troisième boîte de dialogue s’ouvre : saisissez le nombre de colonnes à insérer à chaque intervalle dans le champ prévu à cet effet.
Capture d’écran affichant une invite demandant combien de colonnes insérer à chaque intervalle dans le code VBA d’Excel

6. Cliquez sur le bouton « OK » pour obtenir votre résultat.
Capture d’écran du résultat montrant les colonnes insérées à intervalles réguliers dans Excel après utilisation du code VBA


Utilisez Kutools pour Excel pour insérer un nombre spécifique de Colonnes vides dans Plage de données à intervalles réguliers

Si vous préférez éviter la méthode basée sur le code VBA, la fonctionnalité « Insérer des lignes/colonnes vides » de Kutools pour Excel s’impose comme la solution idéale. En quelques clics seulement, elle vous permet d’insérer un nombre précis de colonnes dans une plage de données à intervalles réguliers.

Kutools pour Excelpropose plus de 300 fonctionnalités avancées pour simplifier les tâches complexes, stimulant ainsi créativité et efficacité.Intégré aux capacités de l’IA, Kutools automatise les tâches avec précision, rendant la gestion des données parfaitement fluide.Informations détaillées sur Kutools pour Excel...         Essai gratuit...

1. Commencez par sélectionner vos plages de données existantes, puis cliquez sur « Kutools » > « Insertion » > « Insérer des lignes/colonnes vides ».
Capture d’écran de l’option Kutools « Insérer des lignes et colonnes vides » dans Excel

2. La boîte de dialogue « Insérer des lignes/colonnes vides » s’ouvre. Vous pouvez voir la plage de données sélectionnée à l’étape 1 affichée dans le champ Plage. Cochez l’option « Colonnes vides » dans la section « Type d'insertion », puis indiquez le nombre d’intervalles entre les colonnes ainsi que le nombre de colonnes à insérer à chaque intervalle. Ici, j’ai saisi respectivement 1 et 3.
Capture d’écran de la boîte de dialogue Kutools « Insérer des lignes et colonnes vides » avec des options pour spécifier les intervalles de colonnes et le nombre de colonnes à insérer

3. Cliquez sur le bouton « OK » pour appliquer les paramètres et obtenir immédiatement votre résultat.
Capture d’écran du résultat final après insertion de colonnes à l’aide de Kutools

Kutools pour Excel– Boostez Excel avec plus de 300 outils essentiels, pour gagner en rapidité et en simplicité, et profitez des fonctionnalités d’intelligence artificielle pour un traitement de données plus intelligent et une productivité accrue.Obtenez-le dès maintenant


Autres opérations (articles)

Comment insérer rapidement une ligne en fonction de la date actuelle dans Excel ?
Imaginez une feuille contenant une ligne avec des dates, et vous souhaitez insérer automatiquement une nouvelle ligne juste à droite de la date du jour — une ligne qui se mette à jour dès l’ouverture du classeur. Existe-t-il une astuce pour y parvenir dans Excel ?

Comment toujours insérer une ligne vide en dessous au lieu d’au-dessus dans Excel ?
Comme chacun le sait, lorsqu’on insère des lignes vides dans une feuille de calcul, celles-ci sont toujours ajoutées au-dessus de la ligne ou de la cellule sélectionnée. Pourtant, il arrive parfois que vous souhaitiez insérer une ligne juste en dessous de la cellule ou de la ligne sélectionnée. Comment faire cela dans Excel ?

Comment insérer automatiquement une nouvelle ligne vide à l’aide d’un bouton de commande dans Excel ?
Dans de nombreux cas, vous pouvez avoir besoin d’insérer une ligne vide à un emplacement précis de votre feuille de calcul. Dans cet article, nous vous montrons comment insérer automatiquement une nouvelle ligne vide en un seul clic sur un bouton de commande dans Excel.

Comment insérer une ligne vide après un texte spécifique dans Excel ?
Vous souhaitez insérer des lignes vides après un texte spécifique, comme illustré dans la capture d’écran ci-dessous ? Découvrez comment le faire rapidement et facilement, sans devoir les ajouter manuellement une par une !

Meilleurs outils de productivité Office

🤖Kutools IA Aide: Révolutionnez Analyse des données grâce à :Exécution intelligente   |  Générez du code|  Créez formules personnalisées  |  Analysez des données et générez des graphiques|  Appelez Fonctions améliorées
Fonctionnalités populaires:Rechercher, mettre en surbrillance ou Marquer les doublons   |  Supprimer les lignes vides   |  Combinez les colonnes ou cellules sans perdre de données   |   Arrondi sans utiliser de formule...
Super RECHERCHEV:RechercheValeurs avec critères multiples  |  RechercheValeurs avec valeurs multiples  |   RechercheValeurs dans plusieurs feuilles   |   Correspondance floue....
Liste déroulante avancée:Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple....
Gestionnaire de colonnes:Ajouter un nombre précis de colonnes|Déplacer des colonnes|Basculer la visibilité des colonnes masquées|Comparer des plages et des colonnes...
Fonctionnalités vedettes:Mise au point de la grille   |  Vue de conception   |Barre de formule améliorée   | Gestionnaire de classeurs et de feuilles   |  Bibliothèque de ressources(Texte automatique)|  Sélecteur de date   |  Consolider les feuilles de calcul  |  Chiffrer/Déchiffrer les cellules   | Envoyer des e-mails par liste   |  Super Filtre   |   Filtre spécial(Filtrer les cellules avec une police en gras/italique/barré...) ...
… et bien plus encore… et plus encore:(,)Supprimer des caractères spécifiques, ...)|   50+Typesde graphiques(, ...)|   40+ Formules pratiques(Calculer l'âge en fonction de la date de naissance, ...)|   19 Outils d’insertion(,Insérer une image depuis un chemin , ...)|   de conversion (Convertir en mots,Conversion de devises, ...)|Fusionner et scinder   (Fusion avancée des lignes,Diviser les cellules , ...)|, ...)   |
Utilisez Kutools dans la langue de votre choix – disponible en anglais, espagnol, allemand, français, chinois et 40+ autres langues !

Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...


Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile

  • Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !

Tous les compléments Kutools. Un seul installateur

Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.

ExcelWordOutlookTabsPowerPoint
  • Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
  • Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
  • Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
  • Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
  • Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels