Loops 第一次使用VBA时，我需要重复此代码，直到单元格为空_Loops_Repeat

Loops 第一次使用VBA时，我需要重复此代码，直到单元格为空

loops

Loops 第一次使用VBA时，我需要重复此代码，直到单元格为空,loops,repeat,Loops,Repeat,第一次使用VBA时，我需要重复此代码，直到单元格为空 Sub Contacts() 'Contacts Macro ' copy past contact name and phone number ' Range("A7").Select ActiveCell.Offset(6).Select Selection.Cut ActiveCell.Offset(0, 1).Select ActiveSheet.Paste ActiveCell.Offset(2, -1).Se

第一次使用VBA时，我需要重复此代码，直到单元格为空

Sub Contacts()
'Contacts Macro
' copy past contact name and phone number
'

Range("A7").Select
ActiveCell.Offset(6).Select
Selection.Cut
ActiveCell.Offset(0, 1).Select
ActiveSheet.Paste
ActiveCell.Offset(2, -1).Select
Selection.Cut
ActiveCell.Offset(0, 1).Select
ActiveSheet.Paste
ActiveCell.Offset(0, -1).Select

端接头