Hi All,
I have come up with the below formula that can give us the coun of number of used rows in a worksheet without opening the file:
=MAX(ROW('Z:\Anupam\Desktop\[Excel_Test.xlsx]Sheet25'!$A$1:$Z$65530)*('Z:\Anupam\Desktop\[Excel_Test.xlsx]Sheet25'!$A$1:$Z$65530<>""))
But the issue is we...
Hi Simon,
Welcome to Chandoo.org Forum,
Please enter the below formula in Cell J1 and drag it down till the last row of your data.
=IF($D1="Y",$E1&$F1&$G1&$H1,IF($D1="N",0))
Please let me know if you find problem in the above formula.
Thanks & Regards,
Anupam
Hi Somnath,
Set NewSheet = Sheets.Add(Type:=xlWorksheet)
In the above line, NewSheet is an object type variable in which new sheet object is being stored using Sheets.Add as Sheets.Add insert the new sheet in the workbook.
Whenever we declare any variable as an object type variable, we use...
Hi Narayan,
You above provided code is really very nice however executing it step by step and keeping "Main" sheet hidden, I found a little issue mentioned below:
If the "Main" sheet is hidden that time the code is not working in the desired manner.
When the "Main" sheet is hidden and...
Hi tazz,
I don't know if I have correctly understood your problem however as per my understanding please try the below steps:
1. Right Click on spreadsheet(Main) and click on Move or Copy...
2. On dialog box appear where you need to select spreadsheet(Main) in Before Sheet: list.
3...
This forum is the best forum and the migration gave us the improved plateform to share our thoughts or ideas, to get familiar with other members. All this is like Icing on the cake.
Thanks to Chandoo and All for giving us this wonderful Forum.
Hi Narayak991, I always wait for your reply to any of the question asked on the forum. Your reply is always very unique and descriptive to understand it well. Your explainantion is awesome.
Hi mr_hiboy,
Try the below code
Sub DeleteColumns()
lc = Worksheets("Sheet1").Range("1:1").End(xlToRight).Column
For i = lc To 1 Step -1
If Cells(7, i).Text <> "Yes" And Cells(7, i).Text <> "yes" Then
Columns(i).EntireColumn.Delete
End If
Next...
Hi mr_hiboy,
Try the below code, this can help you to fullfil your requirement.
Sub DeleteColumns()
lc = Worksheets("Sheet1").Range("1:1").End(xlToRight).Column
For i = lc To 1 Step -1
If Cells(7, i).Text <> "Yes" Then
Columns(i).EntireColumn.Delete
End If
Next...
Hi shrivallabha
Thanks a lot for your help.
I have gone through the above link and learnt new things which are usefull for me however still I could not find anything to close opened folder.
I am also putting my efforts to find the solution and also looking forward to get the solution from...
Hi All Excel Ninja & Experts,
I need your help to know the VBA code to close specific opened folder seen in taskbar.
I have searched a lot but could not find exact code which can help me to loop through all the opened folders in taskbar and then can close specific folder window like we do to...