میخوام یک سطر فایل اکسل رو به یک سطر بالاتر بفرستم ولی تعداد رکوردهام زیاده باید چیکار کنم ؟
New Microsoft Office Excel Worksheet (2).xlsx
New Microsoft Office Excel Worksheet (2).xlsx
-
-
سلام[B][SIZE=1]بخش امضاء :
[/SIZE][/B][LEFT]
[CODE]
Sub Macro()
ActiveCell = "IY" & Right(Application.Name, 5)
With ActiveCell.Characters(Start:=2, Length:=1).Font
.Name = "Webdings"
.Color = 255
End With
End Sub
[/CODE]
[/LEFT] -
اون قسمتی که در پنجره find همه سلول ها انتخاب میشند از ctrl+a استفاده کنید[B][SIZE=1]بخش امضاء :
[/SIZE][/B][LEFT]
[CODE]
Sub Macro()
ActiveCell = "IY" & Right(Application.Name, 5)
With ActiveCell.Characters(Start:=2, Length:=1).Font
.Name = "Webdings"
.Color = 255
End With
End Sub
[/CODE]
[/LEFT]کامنت
کامنت