there is one macro written vbs and it’s is doing some operation in excel, but when there is a single row in excel and it need to do calculation on specific column and there it is failed to do so.
how to fix it.
inv_VBACode.txt (719 Bytes)
pls do let me know if you need more information.
Thanks in advance
Please show the error…Elso it would good idea to debug the macro from the file and then use it in invoke vba
you can see the above img, in this file there is only one row and bot should calculate Aging and Range column based on invoice date column. but it didn’t do.
FYI - bot is able to do the calculation correctly when there is more than one row available.
Okay…so basically your xlup is failing I guess…can you run the macro from excel file and check which line it is failing and what error you are getting
There is no error it seems, but i tried to debug it, and found that here is it is failing
till above it is working fine
I dont think it is failing there it can fail before or after…
because it is just a line to select A1 cell
can you tell what the error is
That lien is done to check if there are filters in first row and remove them…but we can remove that last line anyways…as it is being done at the first already
error is what what you can see in img, it is written as Aging and Range instead value.
shall i try removing last two line and check?
same result even after removing last line
Remvoe the select part and the last
you mean to say removing below two lines?
If ActiveSheet.AutoFilterMode Then ActiveSheet.AutoFilterMode = False
if yes, then already tested but same result.
Then that means its not failing ont hose lines…please first identify the line which is failing…the we cna modify accordingly
yes, i tested couple of times, i found that till selection.filldown is working fine
after that it is failing and changing to text(Aging and Range)
use a message box and view the value of lr looks liek lr is taken as 1 …when you have single row and that is creating the issue
i put msgbox right after selection.filldown and i got the value as 2
If lr > 2 Then
Range("L2:M" & lr).Select
yes, now working as expected.
This topic was automatically closed 3 days after the last reply. New replies are no longer allowed.