vba 2010 windows 7

Hi. Working on: Sub on_N() Dim rng As Range, fnd As Range For Each rng In Range("B2:F2") ' READ Set fnd = Range("R2:R37").Find(rng, LookIn:=xlValues, lookat:=xlWhole) '||||||||||HIGHLIGH If Not fnd Is Nothing Then...

Hi. Sub AA() 'this code count the interval between the same values Set rngData = Sheet2.Range("U2:HH2") For Each cell In rngData If cell = 2 Then '////////////////// ("P2") Sheet7.Range("c2").Offset(0, m) = n n = 0 m = m + 1 Else n = n + 1 End If...

Hi. This is what I am trying to do Range("B11").Formula = "=average(B1:XX1)" ' average distribution B1 Range("B27").Formula = "=average(B17:XX17)" ' average distribution B17 Range("B43").Formula = "=average(B33:XX33)" ' average distribution B33 Range("B59").Formula = "=average(B49:XX49)" '...

Hello. Sub TTT() Dim Y& Dim x& For x = 2 To 9 ''ROWS For Y = 13 To 14 'COLUMNS - M & N Cells(2, 2).Formula = "=IF(" & Cells(x, Y).Address & "<" & Cells(x, Y).Address & ",TRUE, FALSE)" Next Next End Sub Trying to make it work but.... what I have and I expect is Please...

Hello, I hope a good weekend for all I am working on something that really need a loop and also I am looking how to get the ABSOLUTE value here, this is what I have been done already Sub s() [H2:H8923] = [B3:B8923 -H1] [I2:I8923] = [C3:C8923 -H1] [J2:J8923] = [D3:D8923 -H1] [K2:K8923] =...

Hi. I am trying to sort some row from smallest to largest but excel looks like support only vertical data. I have more than 7000 rows, but in random order, my array is B2:F8905 this is a tiny example of what I have and this is the expecting results: most of the examples I tried do not...

Hi. Please, I am trying in a very basic ordinary way to compare two arrays. I need to compare every row on Sheet 2 to every row on sheet 1 and highlight on 1 only as ilustration what I am doing is this: Sub t() Dim A As Integer, B As Integer, C As Integer, D As Integer, E As Integer, F As...