Microsoft Office a beaucoup de fonctions programmées pour vous aider à automatiser des fonctions complexes et des équations . Il n'existe aucune fonction programmée pour supprimer tous les deux rangs dans Excel, mais vous pouvez créer votre propre en faisant une macro dans l'outil de l'éditeur Visual Basic. Macros commandes d'enregistrement , et vous pouvez créer vous-même. Une fois que vous créez le droit macro , vous pouvez utiliser cette fonction dans Excel pour supprimer automatiquement toutes les autres cellules dans votre feuille de calcul en lançant tout simplement la macro sur les cellules sélectionnées . Instructions
1
Ouvrez un nouveau classeur dans Excel et tapez le numéro «1» dans la cellule A1 . Passer la cellule A2 et tapez " 2" dans la cellule A3 . Répétez ce processus jusqu'à ce que vous avez les chiffres de 1 à 5 est entré dans les cellules A1 à A9. Les cellules suivantes devraient avoir les numéros suivants: "1" pour A1, "2" pour A3, "3" pour A5, "4" pour A7 et "5" pour A9
2
Click. "Outils" et sélectionner "Macro ". Cliquez sur " Visual Basic Editor. "
3
Sélectionnez l'onglet "Insertion" et cliquez sur " Module ".
4
Copier la macro suivante et collez- dans la feuille Visual Basic:
Sous Delete_Every_Other_Row ()
. Dimension variables
Y = False ' Changer cette valeur True si vous veulent
' supprimer des lignes 1, 3 , 5, et ainsi de suite .
I = 1
Set xRng = Sélection
< br ' boucle une fois pour chaque ligne de la sélection .
pour XCOUNTER = 1 To xRng.Rows.Count
>
Si Y est vrai , alors ...
Si Y = True Then
'... supprimer une ligne entière de cellules .
xRng.Cells ( I). EntireRow.Delete
' Sinon ...
Else
' ... incrémenter i de l'un afin que nous puissions faire défiler gamme .
I = I + 1
End If
< p> ' Si Y est vrai , faire faux; . s'il y est faux , rendre vrai
Y = Non Y
Suivant XCOUNTER
End Sub
5
cliquez sur «Fermer et retourner à Microsoft Excel » pour quitter , puis tester la macro en mettant en évidence les lignes A1 à A9 sur la feuille de calcul Excel vous faits plus tôt. Cliquez sur " Outils ", puis " Macro" , puis cliquez sur " Macros ".
6
Sélectionnez " Delete_Every_Other_Row " dans le menu Macro , puis cliquez sur "Exécuter". Les lignes alternées seront supprimés et les numéros de 1 à 5 seront affichés dans les cellules A1 à A5 .
