true

Friends , I am trying to Sort a Sheet but Cells are merged , i was able to record a Macro by Manually Unmerge Cells and then Merge , But this whole Process takes time and Lag. Any Suggestions to Tune up this Code . Thanks "Private Sub Repairsort_Click() RepairSort.BackColor = 9434879...

I have a workbook where I allow the user to print certain sheets. (There are potentially 30 to choose from, and they can print as few or as many as they want.) They have the option of having the date & time appear on each sheet, in the right footer. The code places this info in the right...

Hi all I'm trying to join SpecialCells(xlConstants) with SpecialCells(xlFormulas) and no matter what I try I can only one or the other to work never both. Sub Done() Dim NR As Long Application.ScreenUpdating = False Application.EnableEvents = False With Sheets("Your Quotation") NR =...

Hi Fabulous people! I am looking at removing duplicates if they contain False in a certain cell but only if they are duplicates <tbody> T U V W X Y 26707343702 TRUE TRUE 30 0 26707343702TRUETRUE 26707343702 TRUE FALSE 26707343702TRUEFALSE 26707343702 TRUE FALSE...

Hi Folks, Need two options for this guys. If Pivot how can I configure the sheet raw to populate on sheet Dashboard percentage base on the TRUE and FALSE details from SHEET Raw Second approach if pivot will be hard formula I can use on Sheet DB to give me percentage;) SHEET RAW <tbody> 1 A...

The following VBA Code is not allowing for user to copy pivot table from existing workbook to new workbook. Is it possible to edit code to allow this while maintaining the original function of the code? Private Sub Workbook_NewSheet(ByVal Sh As Object) Call DrillDownDefault End Sub...

Private Sub awp() Set wks = Sheet9 If wks.Range("I3").Offset(0, 0).Text = "Yes" Then obYes.Value = True ElseIf wks.Range("I3").Offset(0, 0).Text = "No" Then obNo.Value = True ElseIf wks.Range("I3").Offset(0, 0).Text = "N/A" Then obNa.Value = True End If If...

Private Sub awp() Set wks = Sheet9 If wks.Range("I3").Offset(0, 0).Text = "Yes" Then obYes.Value = True ElseIf wks.Range("I3").Offset(0, 0).Text = "No" Then obNo.Value = True ElseIf wks.Range("I3").Offset(0, 0).Text = "N/A" Then obNa.Value = True End If If...

Hello, I have the formula: =IF(INDEX('4WK MVT'!B:B,MATCH('Worksheet'!C12,'4WK MVT'!D:D,0))="*"&"DC"&"*",True,False) The end goal here is if the returned result has "DC" in it, I want it to the True, if not, False. Pretty sure I am using the wildcard incorrectly or something. Thank you!

Hello, I am hoping someone could help me clean up a formula of mine. I am looking to have the formula calculate between the current date and date received and then if this result is greater than 5 AND another cell ="0" return a "true" result, other wise "false". This is the formula I wrote...

Hi, I'm hoping this will be a pretty simple one for all you experts out there. I have a range of 5 numbers and I just need a formula to give me a yes/no or true/false for if any of the numbers appear in a different range of 5 numbers. For example: Range 1 is 1,2,3,4,5 Range 2 is 7,8,9,10,1...

Hi, I've been struggling with this formula for a little while now. Basically, I want it to return True if any numbers are repeated in the range B8:DG22 however, I want it to ignore text or more precisely, the word "Blank". =SUMPRODUCT(COUNTIFS(B8:DG22,"<>Blank",B8:DG22,B8:DG22)-1)>0 Can...

can someone help me to loop this ? Dim wks As Worksheet Dim addnew As Range Dim addup(15) As Double Set wks = Sheet9 Set addnew = wks.Range("AG3").Offset(0, 0) If ecYes.Value = True Then addnew.Offset(0, 1).Value = ecYes.Caption ElseIf ecNo.Value = True...

Hi all, my whole code extract is below and the highlighted bold red parts are giving me grief. Suddenly, last week, out of the blue, this error started cropping up. I need to determine whether a tour type is Coach, Rail, Air or Self Drive. I make this determination near the start of the code...

How do I successfully nest multiple AND and OR's along the same row? For example, I want to check if K3=V AND AP3 or AR3 or AT3 or AV3 or AX3 or AZ3 or BB3 or BD3 or BF3 or BH3="L" then TRUE, otherwise FALSE. I tried but failed spectacularly.

Dim wks As Worksheet Set wks = Sheet9 If wks.Range("BO3").Offset(0, 0).Text = "Yes" Then apeyes.Value = True ElseIf wks.Range("BO3").Offset(0, 0).Text = "No" Then apeno.Value = True End If If wks.Range("BP3").Offset(0, 0).Text = "Yes" Then apeyes1.Value = True...

Hello: I am currently using Excel 2016 (64 Bit). I opened a workbook that is a few years old with a user form that used to have a context menu upon right clicking fields. I am no longer able to show the context menu with the below error: "Compile error: The code in this project must be...

Hi I have some code (below) that I use to send a Named Range via the MailEnvelope function of Excel. It was working for a while but now, when I run the macro to send the e-mail, everything works up to .Send. There are no crashes or error messages but it doesn't send. Before, you would see...

Please consider this userform initialization code. Private Sub UserForm_Initialize() 'Hide frames F1_WCF.Visible = False F2_WCA.Visible = False F3_WCO.Visible = False F4_CCF.Visible = False F5_CCA.Visible = False F6_CCO.Visible = False F7_PTD.Visible = False...

Hi All, I'm trying to do this formul but is not working. =IF(ISNUMBER(SEARCH("*LR 10*";A2));"M01";B2) so in column A2 I have the long desription of the loan and I want to find the ones that contain "LR 10", and if this is true to put in cell C2 "M01" otherwise the value that is in cell B2...