Telling VBA to find a cell, row, column, range

[opie_18]

Oh, I didn't know that... thanks...

Type mismatch is in row 2, 7,10...
Also row 2,3,7,8 when I dubug and move mouse over them the values show "Nothing" or ""

Thanks,

John

[RobDog888]

Ok, where are the variables defined?

It looks like rRow needs to be dimmed as a Range since you are setting it to a range.

[opie_18]

I am trying to hard code it in a little... however I am having problems with my select case down there in the code... I need that 10 to be static... cause i have Columns 10, 12, 14,... 22 to test against. should the 10 go on the other side of the "=" or how should I refer to it...

2ndly is "oMarketSheet.Columns(rCount, ColAccntE)" syntaxed properly?

Thanks much...

John

Dim rCount As Integer
  Dim ColDate As Integer
  Dim ColAccntB As Integer
  Dim ColAccntE As Integer
  Dim ColRev As Integer
    
  rCount = 11
  ColDate = 2
  ColAccntB = 10
  ColAccntE = 22
  ColRev = 11
    
'For oMarketSheet.Rows(rCount,) To oMarketSheet.Columns(ColDate)
Do While rCount <= 42
 
     If IsDate(oMarketSheet.Cells(rCount, ColDate)) Then
          Do While ColAccntE < 23  'sCol = oMarketSheet.Rows(rCount, ColAcccntB)  oMarketSheet.Columns(rCount, ColAccntE) ' ColAccnt)
          iDate = oMarketSheet.Cells(rCount, ColDate)
                 Select Case Accnt
                        Case oMarketSheet.Columns(rCount, "10") = oMarketSheet.Columns(rCount, ColAccntB) ' = j
                             Accnt = "010-41200"

[RobDog888]

Depending on how you have your column formatted (Date, Number, or Text) this will probably help.

Dim rCount As Range
  Dim ColDate As Date
  Dim ColAccntB As Integer
  Dim ColAccntE As Integer
  Dim ColRev As Integer
  Dim Accnt As String
  Dim rRow As Range
  Dim rCell As Cell

We need to tackle the errors one at a time. Get those working then we can
move on to any others.

[opie_18]

This user type has to be defined for the Cell and Range... how do I do that?

Dim rCell As Cell
Dim rCount As Range

[RobDog888]

Are you writting the code in the VBA Editor (behind Excel) or from Visual Basic?

[opie_18]

got it...

Thanks