Hi Abhinav
For anyone looking at your problem it is a little confusing. You are getting exactly the same result in A1 as A2. Why would you replicate your result in 2 cells. This question is not answered in the remainder of your post so most people just leave your post hanging because they...
Hi Dave
I don't' use UDFs at all. I have seen very few instances where you can't create a custom formula and UDFs are memory hogs. I am not a big fan that is not to say that they do not have their uses, I just always find a way for native Excel to get the job done. It is faster and easier...
Hi Once again Dave
No need to create a UDF when normal formula will do the job for you. Just change the formula to say if there is a 0 in a cell then display ""
If you want to clear these errors (not recommended) then maybe some coding.
Option Explicit
Sub RemErr()
Dim rng As Range...
Hi Begcar
A file is almost mandatory for this sort of question. Please consider this closely in the furture.
Here is a file of a bubble chart. Add marketing into A6 then add 4500 in B6. Notice how these are added to the table and the chart. You should be able to adapt this to your...
Hi vijeshspaul
Add the following
Columns(c.Column).EntireColumn.Select
Although why are you selecting anything? What are you trying to do?
Take care
Smallman
Bomino
You have to make sure your dates at the same in each sheet. They currently are not.
=IFERROR(INDEX(Data!$C$2:$C$8,MATCH(1,INDEX((Data!$A$2:$A$8=D$3)*(Data!$B$2:$B$8=$C4),),)),"")
I included a second table with the dates set out correctly.
Take care
Smallman
Hi Dave
Would this work for you. I tried to build in the flexibility I thought you were looking for.
=VLOOKUP(H5,$B$3:$F$26,MATCH($H$3,$C$2:$F$2,0)+1,1)
Change Cell H3 for the flexibility.
Take care
Smallman
Hi 100joec
There are probably other ways but with VBA I would do this.
Sub shifto()
Range("b3", Range("B" & Rows.Count).End(xlUp)).SpecialCells(2).Copy Range("H" & Rows.Count).End(xlUp)(2)
Range("c3", Range("c" & Rows.Count).End(xlUp)).SpecialCells(2).Copy Range("H" &...
Hi Alamzeb
You will need to turn the alerts off when you run the code like this. Otherwise it run more times than it needs to.
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Not Intersect(Target, [B3]) Is Nothing Then
If [B3] = "Remove all and...
Hi Asalamk
There are a number of ways your could do this. One of which is as you say set up a pivot table. You could have a dynamic named range (normal named range or VBA) and each time you refresh your procedure you could have the pivot table update as you entered the sheet. The coding is...
Hi dibianst
I am confused. You said all your templates were the same but your master sheet does not look like you template sheet. The parent and child should be identical.
Firstly clear that up because in my mind the Master workbook is exactly the same as the template.
Secondly do all...
Hi dibianst
Do you have a dummy version of the file you want updated. If you are not comfortable using employee names put a example names in and example data. Make the format the same though. That will help everyone understand your problem.
Take care
Smallman
@Deepak
This bit:
I strongly disagree. You gave your time to help someone who asked. You saw a gap in the coding and you corrected it. You did all anyone could ever ask.
Take care
Smallman
Hi @inddon
I don't think we do mark posts as solved. But it is really nice when people like yourself take the time to say suggestions helped. Other people looking in future will know that they should be able to adapt the solution.
All the best
Smallman
Hi @rtyagis
If you use the sheet name in your coding you quickly run into problems which the sheet name changes. I try and always use the sheet code name when ever specifically refering to a sheet. The following is the sheet code name
You see in the above I have 4 sheets. To the right...
Hi inddon
Give the following a try. One will make it go the way you want the other will return the cursor back to normal function.
Sub GoRight()
Application.MoveAfterReturnDirection = xlToRight
End Sub
Sub GoSouth()
Application.MoveAfterReturnDirection = xlDown
End Sub
Take care...
Ha - that says clearcontents.
I mean to say and I will go the long way around here, when you hit the Record button on a macro the recorder records everything. Users tend to leave the selection in coding and anything else the recorder may leave in which adds no value to the file.
Take care...
Always try and improve on the coding which is available as there will be people coming in after (maybe years after) to look at what is there. Drop the best you have and if someone improves on it try and learn from that.
Oh yeah. Here is a valid lesson then, in VBA there is no need to select anything in order to perform an action. After you have written some code take a look at it and if there is any selection in the code take it out.
Take care
Smallman