![]() |
Specify a target range in Function arguements
I would like to specify a target range in a vba function for excel and
redirect the results to the target range specified at the begining instead of using the function name, but keep givning me error, but was okay in Sub routine. It goes like this... Function Alpha(yTarget As Range, Other input arguments) ''' Resize yTarget based on the results to spit out and use For loop yTarget.Resize(m, n).name = "yTarget" For i = 1 To m For j = 1 to n yTarget.Cells(i, j) = results(i, j) Next j Next i I will appreciate if you can help me on this... |
Specify a target range in Function arguements
User-Defined-Functions can only change the value of the cells that call them, so you'll need to keep
it a macro. HTH, Bernie MS Excel MVP wrote in message ups.com... I would like to specify a target range in a vba function for excel and redirect the results to the target range specified at the begining instead of using the function name, but keep givning me error, but was okay in Sub routine. It goes like this... Function Alpha(yTarget As Range, Other input arguments) ''' Resize yTarget based on the results to spit out and use For loop yTarget.Resize(m, n).name = "yTarget" For i = 1 To m For j = 1 to n yTarget.Cells(i, j) = results(i, j) Next j Next i I will appreciate if you can help me on this... |
Specify a target range in Function arguements
Your function should be declared as to what object is returned and that
object assigned to the name of the function. For example: Function Alpha(yTarget As Range, Other input arguments) As Range .... .... Set Alpha = ytarget End Function Function Alpha(yTarget As Range, Other input arguments) ''' Resize yTarget based on the results to spit out and use For loop yTarget.Resize(m, n).name = "yTarget" For i = 1 To m For j = 1 to n yTarget.Cells(i, j) = results(i, j) Next j Next i -- Les Torchia-Wells " wrote: I would like to specify a target range in a vba function for excel and redirect the results to the target range specified at the begining instead of using the function name, but keep givning me error, but was okay in Sub routine. It goes like this... Function Alpha(yTarget As Range, Other input arguments) ''' Resize yTarget based on the results to spit out and use For loop yTarget.Resize(m, n).name = "yTarget" For i = 1 To m For j = 1 to n yTarget.Cells(i, j) = results(i, j) Next j Next i I will appreciate if you can help me on this... |
All times are GMT +1. The time now is 10:55 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com