Todd prépare une liste d’inventaire de bandes dessinées et souhaite que chaque cellule de la colonne A contienne le texte « Batman (1940) 0 » répété 3 fois, suivi de « Batman (1940) 1 » répété trois fois, « Batman (1940) 2 « 

répété 3 fois, tout au long de « Batman (1940) 700 » répété 3 fois. Cela représente 2103 lignes individuelles, mais Todd ne sait pas comment répéter des modèles comme celui-ci lors de la copie ou du remplissage de cellules.

Il existe en fait plusieurs façons d’aborder une tâche comme celle-ci. Une façon consiste simplement à créer une seule séquence, puis à copier et coller deux fois.

Voici l’idée générale:

  1. Dans la cellule A1, entrez ce qui suit: Batman (1940) 0. Sélectionnez la cellule A1.

  2. Faites glisser la poignée de recopie vers la cellule A701. Cela devrait vous donner une séquence complète de «Batman (1940) 0» à «Batman (1940) 700», et les cellules de la plage doivent toujours être sélectionnées.

  3. Appuyez sur Ctrl + C pour copier la plage dans le Presse-papiers.

  4. Collez la plage dans la cellule A702, puis à nouveau dans la cellule A1403.

  5. Trier la colonne A.

Tout ce processus va très vite; J’en ai fini avec cela en 45 secondes environ. Il y a cependant un inconvénient: après le tri, vous n’obtiendrez pas la séquence de cellules dans l’ordre numérique en fonction du nombre à la fin du texte. Si vous voulez vous en assurer, vous voudrez entrer votre première bande dessinée (dans la cellule A1) comme « Batman (1940) 000 ». Lorsque vous utilisez trois chiffres pour le numéro de fin, le tri sera très bien.

Il existe une autre approche que vous pouvez utiliser qui repose également sur la poignée de recopie. Suivez ces étapes générales:

  1. Dans la cellule A1, entrez ce qui suit: Batman (1940) 0. Dans la cellule A4, entrez ce qui suit: Batman (1940) 1. Sélectionnez les cellules A1: A6. (C’est très important.)

  2. Faites glisser la poignée de recopie vers la cellule A2103. Cela devrait vous donner une séquence complète de «Batman (1940) 0» à «Batman (1940) 700» avec deux cellules vides après chaque élément de la séquence, et les cellules de la plage doivent toujours être sélectionnées.

  3. Appuyez sur F5. Excel affiche la boîte de dialogue Atteindre.

  4. Cliquez sur le bouton Spécial. Excel affiche la boîte de dialogue Aller à spécial.

(Voir la figure 1.)

  1. Assurez-vous que le bouton radio Blanks est sélectionné.

  2. Cliquez sur le bouton OK. Excel modifie la sélection de sorte que seules les cellules vides de la plage soient sélectionnées.

  3. Dans la barre de formule, tapez cette formule: = A1. Appuyez sur Ctrl + Entrée. Cela copie la formule dans toutes les cellules vides.

  4. Sélectionnez les cellules A1: A2103.

  5. Appuyez sur Ctrl + C pour copier la plage dans le Presse-papiers.

  6. Utilisez Collage spécial pour coller des valeurs. Cela convertit les formules en valeurs.

Une troisième approche – que je trouve très rapide à mettre en œuvre – consiste à utiliser une formule dès le départ:

  1. Dans la cellule A1, entrez la formule suivante: * = « Batman (1940)

 » & INT ((ROW () – 1) / 3) *. Sélectionnez les cellules A1: A2103.

  1. Appuyez sur Ctrl + D. La formule de la cellule A1 est copiée dans le reste de la plage sélectionnée.

  2. Appuyez sur Ctrl + C pour copier la plage dans le Presse-papiers.

  3. Utilisez Collage spécial pour coller des valeurs. (Cela convertit les formules en valeurs.)

Si vous avez besoin de créer des séquences comme celle-ci assez souvent, vous apprécierez une approche macro-basée. Ce qui suit est simple, en plaçant la séquence de texte souhaitée dans la colonne A:

Sub ComicSequence()

Dim sTemp As String     Dim J As Integer     Dim K As Integer

sTemp = "Batman (1940) "

For J = 0 To 700         For K = 1 To 3             Cells(J * 3 + K, 1).Value = sTemp & J         Next K     Next J End Sub

Pour utiliser une autre préface à vos valeurs de cellule, tout ce que vous avez à faire est de modifier la valeur que vous attribuez à la chaîne sTemp.

ExcelTips est votre source pour une formation Microsoft Excel rentable.

Cette astuce (9410) s’applique à Microsoft Excel 2007, 2010, 2013, 2016, 2019 et Excel dans Office 365.