In the following code, I am getting a next without for error after dropping in the 'If IsNumeric(strSplitter(x)) Then' line
Any ideas as to why? The 'Next x' has a corresponding 'For x'
Sub ExpandAIM()
Dim wb As Workbook
Dim ws As Worksheet
Dim ws2 As Worksheet
Dim lngRowFrom As Long
Dim...
Hi Guys,
I am looking to concatenate duplicates in my worksheet. I looked at the concatenate code samples using the search feature, but I was unable to locate anything that directly applied to my situation. Example below:
Existing Table
Column A Column B
987654321...
I coded the below script to have Excel exit a sub if it finds duplicates in a row. However, when it runs, it tells performs the else function for n times there is no duplicate.
What I thought it would do is scrub column F for duplicates and display the duplicate message then exit the sub.
If...
Hello VBA Wizards,
I was hoping someone can help me with the an issue I am having with my VBA.
I am running the following script:
Sub FillRange()
Dim RowCount As Integer
Range("E2").Select
RowCount = Range(Selection, Selection.End(xlDown)).Count
Num = "=IF(OR(H2=" & "Closed" &...
I need some help understanding this code. I am trying to understand a previous programmers coding and I am only a beginner with VBA coding. Any help is appreciated.
Option Compare Database
Function UpdateAmounts() As Boolean
Dim db As Database
Dim tdf As TableDef
Dim fld As...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.