Right and Left Function
I am hoping to find a way to make the code below work.
Basically I have values in the 'A' Column that looks something Like This:
Dim Dup As String
Dim j As Integer
For j = 3 To 21
If ActiveSheet.Cells(j, "B").Text = Right(ActiveSheet.Cells(j, "B"), 3) Then
ActiveSheet.Cells(j, "B").Value = Left(ActiveSheet.Cells(j, "G"), 7)
Dup = ActiveSheet.Cells(j, "B").Value
I want the data to display like this:
Sorry, I meant the 'B' Column.
Any suggestions on what that formula would be?
Originally Posted by batman61
I don't answer coding questions via PM or Email. Please post a thread in the appropriate forum section.
Please use [Code]your code goes in here[/Code] tags when posting code.
Before posting your question, did you look here
Got a question on Linux? Visit our Linux sister site.
Modifications Required For VB6 Apps To Work On Vista
I have this formula:
How do I assign it to some variable? This formula does not work because it creates a circular reference. However, I need the information in the 'A' Column.
ActiveCell.Formula = _
Selection.AutoFill Destination:=Range("A3:A5000"), Type:=xlFillDefault
Any help will be greatly appreciated.
-- Android Development Center
-- Cloud Development Project Center
-- HTML5 Development Center
-- Windows Mobile Development Center