vb操作excel问题，急，请高手帮忙看看！

这是我建的一个函数，代码是从EXCEL宏中拷贝来的。
现在问题是我在第一个窗体的过程中调用该函数，可以正确执行，但是换了一个窗体的过程来调用却提示“对象变量或WITH块变量未设置”，在上述两个过程中，我都已正确建立与EXCEL的联接，且调用第一个过程后EXCEL对象已关闭。
Public Function Set_Border(ByVal row_no1 As String, ByVal xlSheet_in As Excel.Worksheet) As Boolean

xlSheet_in.Activate
xlSheet_in.Range("A1:F" & row_no1).Select

Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
With Selection.Borders(xlEdgeLeft)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeTop)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selecti

excel 操作问题 急! excel宏操作中的vb问题 急求：vb 中excel问题 VB查询EXCEL的问题?急啊 VB+EXCEL问题,请高手赐教! EXCEL的操作问题,,急,.谢谢! 关于EXCEL操作的问题,急! 求救：关于excel表格操作问题 急！！！ Excel操作问题，请教教我！ vb问题，请帮忙，急！