VBA сызыгын жок кылуу - бул иштеп чыгуучулар тарабынан стандарттуу жана кеңири колдонулган жол-жобо. Бирок тажрыйбасы азыраак колдонуучулар үчүн бул иш бир аз кыйынчылыктарды алып келиши мүмкүн.
Нускамалар
1 кадам
Жок кылуу командасынын жардамы менен сызык буйругу боюнча синтаксисти түшүнгөнүңүзгө ынаныңыз. Ошентип, активдүү уячаны камтыган катар үчүн буйрук ActiveCell. EntireRow. Delete сыяктуу көрүнөт жана бир катар катарларды жок кылуу зарылдыгы аны катарларга ("first_line_number: last_line_number") өзгөртөт. Delete (Excel үчүн).
2-кадам
VBAдагы тандалган сап буйругу үчүн окшош синтаксисти колдонуңуз, бирок өркүндөтүлгөн параметрлер менен. Бул үчүн биринчи кезекте талап кылынган иш-аракетти аныктаңыз: Private Sub Delete line_Click (). Керек тиркеме Dim ea As Excel. Application көрсөтүңүз жана талап кылынган жумуш китебин тандаңыз Dim ewb Excel. Workbook. Андан кийин Dim ews баракчасын Excel. Worksheet документиндей түзөтүңүз.
3-кадам
Бир сапты өткөрүп, Set XLAp = CreateObject (Class: = "Excel. Application") киргизиңиз. Төмөнкү сапка так жайгашууну орнотуңуз: XLWb = XLAp. Workbooks орнотуңуз. Ачуу ("drive_name: 1.xls") Төмөнкү маанини колдонуңуз: XLWs = XLWb. ActiveSheet орнотуңуз.
4-кадам
Башка сапты өткөрүп, тандалган жумуштун маанисин киргизиңиз: XLWs. Rows (1). Жок кылуу. Түзөтүлгөн документти сактоо: XLWb. Save. Ачык булак колдонмосунан чыгуу: XLAp. Quit.
5-кадам
Кийинки сапты өткөрүп, өзгөрмөлөрдү эс тутум объектилерине алмаштырыңыз: XLWs = Эч нерсе жок. Ар бир ачык өзгөрмө үчүн бир эле буйрукту кайталаңыз: XLWb = Эч нерсе эмес, акыркысы: XLAp = Эч нерсе жок. Команданы стандарттуу End Sub менен бүтүрүңүз.
6-кадам
Документтеги керексиз саптарды жок кылуу үчүн кыйла татаал операцияларды жүргүзүү үчүн макроэлектрондорду колдонуңуз. Ал үчүн жаңы Excel жумушчу китебин түзүп, керектүү баалуулуктарды киргизиңиз. Программа терезесинин үстүңкү куралдар панелиндеги "Сервис" менюсун ачып, "Макро" пунктун тандаңыз. "Visual Basic Editor" суб-пунктун тандап, "Вставка" менюсун кеңейтиңиз. "Модуль" пунктун тандап, түзүлгөн документти кыстарыңыз. "Куралдар" менюсуна кайтып, дагы бир жолу "Макро" пунктуна өтүңүз. "Макростар" кичи пунктун колдонуп, жаңы түзүлгөндүгүн көрсөтүңүз. Макросты иштетүү баскычын чыкылдатыңыз.
