Hi XLPadawan,
Nice way.. :)
BTW.. did you tried.. by filling any of the word.. more than 8 times (your fixed count of any number in the attachment..)
and just for curiosity.. Which one you want to avoid more.. "Array Formula" or "Using lots of Helper Cell"
Hi Sophanith!
try this..
Private Sub CheckBox1_Click()
Dim myrange As Range
Set myrange = Range("B1:B300")
For Each cell In myrange
If cell <> "" Then
If cell.Value = "KHR (Riel)" Or cell.Value = "USD ($US)" Or cell.Value = "THB (Baht)" Then
cell.EntireRow.Hidden = CheckBox1...
Just for basic purpose...
you can use in B3..
=WEEKNUM(1&A2)
In case if its working.. you can avoid.. checking # of weeks in the month.. irrespective of 4 or 5.. and week should be start from 1st monday..
Let us know if you want..
BTW.. in c3, d3, you can just add B3+1.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then
If Evaluate("Countif(c:c," & Target.Address & ")") > 1 Then
MsgBox Target.Value & " is a duplicate entry. It will be removed.", vbExclamation, "Data Entry Editor"...
Hi Sammyp..
Try this..
If Not rngCrit Is Nothing Then
Sheet2.Range("RFPTable").AdvancedFilter _
Action:=xlFilterInPlace, _
CriteriaRange:=rngCrit
'CopyToRange:=Range("ExtractRFP"), Unique:=False
Sheet1.Range("B8").CurrentRegion.Clear
On Error Resume Next
With...
Try this..
=INDEX('Horizontal '!$A$2:$E$26,COLUMN(A1),ROW(A1))
In Index function.. in place of ROW section use Column and vice versa for COLUMN
Drag downward / right to fetch the recotrds.
Thanks @Deepak , @ThrottleWorks & @vrunda ..
for giving us chance to learn new challenges and solutions..
and @Faseeh & @Luke M .. good luck.. for sharing those opportunity equally between us.. :)
Just for sharing purpose.. :)
To avoid Ctrl + Shift + Enter..
the formula part which is rturning array output.. block that part with Index function.. It work great.. if someone is unaware of Ctrl + Shift + Enter
=INDEX(B2:B15,INDEX(MATCH(1,(A2:A15="G23")*(D2:D15="R"),0),,))
Hi Karthik Thandapani
there is lots other way to open an excel file.. by manual click..
try to search for Application.getopenfilename.. and set the opened sheet as TargetWorkbook..
set targetworkbook = application.getopenfilename(....)
It will only goes to next line of code.. after...
Hey Somu..
Thanks for the appreciation.. and sorry for not able to contribute much those days..
but glad that, you are there to fill those gaps.. thanks a lot..
I have created a customized user form.. nothing just company logo at top right and theme color for form.. and a company hyperlink.
Saving the frm file.. and import everytime is not a big task.. but.. just like sheet1 / book1..
is there any default location to save the frm file..
So that...