Accéder au contenu principal

Kutools for Office — Une Suite. Cinq Outils. Accomplissez Plus.

Comment insérer un nombre spécifique de colonnes à des intervalles fixes dans Excel ?

Author Zhoumandy Last modified

Dans votre utilisation quotidienne d'Excel, vous pouvez rencontrer une situation où vous devez ajouter plus de colonnes entre les colonnes existantes. Vous pouvez bien sûr insérer les colonnes une par une en utilisant la fonction Insérer. Mais lorsque vous travaillez avec une grande quantité de données et que vous devez insérer trois colonnes après chaque seconde ou nième colonne, la fonction Insérer n'est apparemment pas efficace. Alors, comment pouvez-vous terminer rapidement cette tâche ? Dans ce tutoriel, nous parlerons de deux méthodes simples pour résoudre le problème.

Utiliser du code VBA pour insérer un nombre spécifique de colonnes vides dans une plage de données à intervalles fixes

Utiliser Kutools pour Excel pour insérer un nombre spécifique de colonnes vides dans une plage de données à intervalles fixes


Utiliser du code VBA pour insérer un nombre spécifique de colonnes vides dans une plage de données à intervalles fixes

Nous pouvons utiliser le "code VBA" ci-dessous pour insérer un nombre spécifique de colonnes vides après chaque nième colonne. Veuillez procéder comme suit.

1. Appuyez sur les touches "Alt + F11" dans Excel, ce qui ouvre la fenêtre "Microsoft Visual Basic for Applications".

2. Cliquez sur "Insérer" > "Module" et 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 apparaît pour vous rappeler de sélectionner la "plage de données" dans laquelle vous souhaitez insérer des colonnes vides.
A screenshot showing a prompt to select a data range in Excel when using VBA to insert columns

4. Cliquez sur le bouton "OK". Une autre boîte de dialogue apparaît, veuillez entrer "le nombre d'intervalles de colonnes" dans la zone "Entrer l'intervalle de colonnes".
A screenshot showing a prompt asking for the column interval in VBA code to insert columns in Excel

5. Continuez à cliquer sur le bouton "OK". La troisième boîte de dialogue apparaît, veuillez spécifier "le nombre de colonnes que vous souhaitez insérer à chaque intervalle" dans la zone.
A screenshot showing a prompt asking how many columns to insert at each interval in VBA code in Excel

6. Cliquez sur le bouton "OK" pour obtenir le résultat.
A screenshot of the result showing inserted columns at fixed intervals in Excel after using VBA code


Utiliser Kutools pour Excel pour insérer un nombre spécifique de colonnes vides dans une plage de données à intervalles fixes

Si vous ne souhaitez pas utiliser la méthode du code VBA, la fonctionnalité "Insérer des lignes et des colonnes vides" de "Kutools pour Excel" est la solution parfaite pour vous. Avec cette fonctionnalité, vous pouvez insérer un nombre spécifique de colonnes dans une plage de données à intervalles fixes en quelques clics seulement.

Kutools pour Excel propose plus de 300 fonctionnalités avancées pour simplifier les tâches complexes, augmentant ainsi la créativité et l'efficacité. Intégré à des capacités d'IA, Kutools automatise les tâches avec précision, rendant la gestion des données facile et sans effort. Informations détaillées sur Kutools pour Excel...  Essai gratuit...

1. Sélectionnez d'abord la plage de données existante. Ensuite, cliquez sur "Kutools" > "Insérer" > "Insérer des lignes et des colonnes vides".
A screenshot showing the Kutools 'Insert Blank Rows & Columns' option in Excel

2. La boîte de dialogue "Insérer des lignes et des colonnes vides" apparaît. Vous pouvez voir la plage de données que vous avez sélectionnée à l'étape 1 affichée dans la zone Plage. Choisissez l'option "Colonnes vides" dans la section "Type d'insertion". Et spécifiez "le nombre d'intervalles de colonnes" et "les colonnes que vous souhaitez insérer à chaque intervalle". Ici, j'ai saisi 1 et 3 séparément.
A screenshot of the Kutools 'Insert Blank Rows & Columns' dialog box with options to specify column intervals and number of columns to insert

3. Cliquez sur le bouton "OK" pour terminer la configuration et obtenir le résultat.
A screenshot showing the final result after inserting columns using Kutools

Kutools pour Excel - Boostez Excel avec plus de 300 outils essentiels. Profitez de fonctionnalités IA gratuites en permanence ! Obtenez-le maintenant


Autres opérations (Articles)

Comment insérer rapidement une ligne basée sur la date actuelle dans Excel ?
Supposons qu'il y ait une feuille contenant une ligne avec des dates, et maintenant je veux insérer une ligne juste après la date actuelle qui changera automatiquement lors de l'ouverture du classeur chaque jour. Existe-t-il un moyen de résoudre cela dans Excel ?

Comment toujours insérer une ligne vide en dessous au lieu d'au-dessus dans Excel
Comme nous le savons tous, lors de l'insertion d'une ligne vide dans une feuille de calcul, la ligne vide sera toujours insérée au-dessus de la ligne ou de la cellule sélectionnée. Mais parfois, vous devrez peut-être insérer la ligne en dessous de la cellule ou de la ligne sélectionnée. Comment pourriez-vous résoudre ce problème dans Excel ?

Comment insérer automatiquement une nouvelle ligne vide via un bouton de commande dans Excel ?
Dans de nombreux cas, vous devrez peut-être insérer une nouvelle ligne vide dans une position spécifique de votre feuille de calcul. Dans cet article, nous vous montrerons comment insérer automatiquement une nouvelle ligne vide en cliquant sur un bouton de commande dans Excel.

Comment insérer une ligne vide après un texte spécifique dans Excel ?
Si vous souhaitez insérer des lignes vides après un texte spécifique comme indiqué dans la capture d'écran suivante, comment gérer cela rapidement et facilement sans avoir à les insérer manuellement une par une ?

Meilleurs outils de productivité pour Office

🤖 Kutools AI Aide : Révolutionnez l'analyse de données avec : Exécution intelligente | Générer du code | Créer des formules personnalisées | Analyser des données et générer des graphiques | Appeler les Fonctions améliorées de Kutools
Fonctionnalités populaires : Trouver, mettre en évidence ou marquer les doublons | Supprimer les lignes vides | Combinez les colonnes ou les cellules sans perte de données | Arrondir sans formule...
Super RECHERCHEV : Recherche multi-critères | Recherche multi-valeurs | Recherche multi-feuilles | Correspondance floue...
Liste déroulante avancée : Créer rapidement une liste déroulante | Liste déroulante dépendante | Liste déroulante à sélection multiple...
Gestionnaire de colonnes : Ajouter un nombre spécifique de Colonnes | Déplacer des Colonnes | Alterner l’état de visibilité des Colonnes masquées | Comparer des plages & Colonnes...
Fonctionnalités phares : Mise au point de la grille | Affichage de conception | Barre de formule améliorée | Gestionnaire de Classeur & Feuille de calcul | Bibliothèque d’AutoTexte | Sélecteur de date | Merge Worksheets | Chiffrer/Déchiffrer les cellules | Envoyer un e-mail par liste | Super Filtre | Filtre spécial (filtrer les cellules avec une police en gras/italique/barré...)...
Top15 des ensembles d’outils :12 outils de texte (Ajouter du texte, Supprimer des caractères spécifiques, ...) |50+ Types de graphiques (Diagramme de Gantt, ...) |40+ Formules pratiques (Calculer l’âge en fonction de la date de naissance, ...) |19 outils d’insertion (Insérer un code QR, Insérer une image depuis le chemin, ...) |12 outils de conversion (Convertir en mots, Conversion de devises, ...) |7 outils de fusion & division (Fusion avancée des lignes, Diviser les cellules, ...) | ... et bien plus encore
Utilisez Kutools dans la langue de votre choix – disponible en Anglais, Espagnol, Allemand, Français, Chinois et plus de40 autres !

Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...


Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.

  • Activez la modification 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é de50 % et réduit des centaines de clics de souris chaque jour !

Tous les modules complémentaires Kutools. Une seule installation

La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.

Excel Word Outlook Tabs PowerPoint
  • Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
  • Un installateur, une licence — installation en quelques minutes (compatible MSI)
  • Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
  • Essai complet30 jours — sans inscription, ni carte bancaire
  • Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels