xstr

Hi All, I am trying to find a particular value in the list with SUM function. Example: 100, 120, 150, 180, 120, 100, 140 And the result I need should be 450, whereas if you add the 150, 180 & 120 from the list, we will get that particular value (450). I looked on internet and I found the...

Hi I am new at macros and VBA editing. I wanted to split txt form numbers in cells so I putted this code in module: Public Function SplitText(pWorkRng As Range, pIsNumber As Boolean) As String 'Updateby20150306 Dim xLen As Long Dim xStr As String xLen =...

Hello friends, Hope all is well! The VB has a bug. Trying to filter a PivotTable with a cell value (CB2). I got the bug: unable to get the pivotfields property of the worksheet class And the following line is highlighted: Set xPFile = xPTable.PivotFields("Month") Your kind & continuous...

I had this code working for my pivot table/chart to update from a drop down list and its stopped working :( Does anyone have any ideas why it has stopped working? Private Sub Worksheet_Change(ByVal Target As Range) 'Update 20190604 Dim xPTable As PivotTable Dim xPFile As PivotField...

Good day friends, I have a macro which selects a folder and then makes a Dir list and counts the number of pages in the pdf. I am needing to replace the folder picker portion of the code with the static path of a folder. (This would prevent me from having to select the same folder every time)...

Hi All, In the below example, I want to add each days splitted amount in Amt 3 and reconcile with Amt 1 & Amt 2, say for example, For Monday, if we add first 4 rows in Amt 3, we get 2000 which is in Amt 2 and if we add next 3 rows of Monday , we get 1000 which is in Amt 1. Anyone's help with...

Hi, I am trying to step through a varied range to get the first letter of that cell and put that letter in another varied range cell on the same row then go to the next cell in the 1st range. I know the 2nd range is the issue but not sure how to fix it, Can some one help please. Code Below...

I have found the VBA code to solve the above mentioned problem - but it will only work for one cell per sheet: <code class="vb keyword">Private</code> <code class="vb keyword">Sub</code> <code class="vb plain">Worksheet_BeforeDoubleClick(</code><code class="vb keyword">ByVal</code> <code...

Hallo. After using the autofilter, the visible cells text values should be returned on message box. My initial code is below. The problem is that it returns only 1st visible cell's value. Sub Wood()Dim rngVisible As Range Dim xStr As String Set rngVisible = Range("A2:A" & Cells(Rows.Count...

Is there a way to find ALL possible combinations that equal a specific sum? I used the code below, but it only gives me one combination and I need to know all possibilities. Any suggestions? <code class="vb keyword" style="white-space: nowrap; font-size: 1em !important; background: none...

I am attempting to create a VBA macro which will save numerous excel files as CSV files without the text qualifiers before and after the text string. The below code will accomplish this, however, I can't get this to work without excel displaying the Save As prompt. How can I adjust the below...

Hello, I am using an Autofill Code for in a a dropdown list. I have formulas in other cells that are dependent on the drop down cell entry and work when the Autofill Code and Combobox are removed. The code works fine if the entry is alphanumeric but will not work if the entry is only numeric...

Hello Wizards I am stuck after 2 hours of google searching, and trial and error. I have decided to defer to you for help. I found some cool code to turn my data validation boxes into searchable combo boxes making the spreadsheet user's life much easier. However the code does not omit blank...