Excel VBA-目标作为范围

Excel VBA-目标作为范围,excel,function,runtime-error,vba,Excel,Function,Runtime Error,Vba,早上好。我的问题与运行时错误“91”有关-未设置对象变量。我不知道那错误的原因是什么。代码如下: Function Zakres(kol_zakr As Long, rng_zakr As Range) As Range Zakres = rng_zakr.Worksheet.Range(CStr(Module1.Kolumna_litera(CLng(kol_zakr)) & Module1.wier_pierwszy & ":" & Kolumna_liter

早上好。我的问题与运行时错误“91”有关-未设置对象变量。我不知道那错误的原因是什么。代码如下:

Function Zakres(kol_zakr As Long, rng_zakr As Range) As Range
    Zakres = rng_zakr.Worksheet.Range(CStr(Module1.Kolumna_litera(CLng(kol_zakr)) & Module1.wier_pierwszy & ":" & Kolumna_litera(CLng(kol_zakr)) & Module1.wier_ostatni))
End Function

您如何调用该函数?可能您没有传递有效的范围对象。Zakres(y,Target)-其中Target是private sub的参数,y是Target cellWhat private sub的列号?我假设您在该工作簿中确实有一个名为
Module1
的模块?是的,但我还有一个处理工作表更改事件的专用子模块。当然,模块1不是虚构的:)刚才注意到,您缺少
Set
Set-Zakres=rng_-zakr.Worksheet.Range(CStr(Module1.Kolumna-u-litera(CLng(kol_-zakr))&Module1.wier\u-pierwszy&“:”&Kolumna-u-litera(CLng(kol-zakr))&Module1.wier-ostatni)