Je suis en train d' écrire un VBScript qui ouvre un fichier Excel, supprime des lignes Xà Ypartir d' une feuille spécifique puis enregistre et ferme le fichier. La partie d'ouverture et de clôture que j'ai vers le bas mais la suppression de la partie est ce avec quoi je lutte. Xet Ysont fixes, disons les rangées 6 à 10.
Set objExcel=CreateObject("Excel.Application")
objExcel.Visible = True
Set wb = objExcel.Workbooks.open("FILE_ADDRESS")
Set ws = wb.Sheets(1)
ws.Rows(2).Delete
wb.Save
wb.Close
objExcel.Quit
Utilisation:
ws.Rows("6:10").EntireRow.Delete
Vous pouvez également définir 6 et 10 comme variables, puis avoir quelque chose comme
ws.Rows(x & ":" & y).EntireRow.Delete
Éditer:
Si cela ne fonctionne pas, essayez:
wb.Sheets("sheet name").Range("A" & x & ":A" & y).EntireRow.Delete
Este artículo se recopila de Internet, indique la fuente cuando se vuelva a imprimir.
En caso de infracción, por favor [email protected] Eliminar
Déjame decir algunas palabras