Results 1 to 5 of 5

Thread: VBA (Excel)

Hybrid View

Previous Post Previous Post   Next Post Next Post
  1. #1
    Registered User MrShadow's Avatar
    Join Date: Jul:2007
    Location:
    Posts: 2,606

    VBA (Excel)

    ,
    , "" , . "" ( ) "" Sheet. 8 10 , . 8 . ( 1 8)? + (if) , , ( 300 ...). , do - while - ...

    (a[i][j])

  2. #2
    Registered User
    Join Date: Oct:2003
    Location:
    Posts: 4,317
    - ?
    . property Cells. , Range.
    , "Looping Through a Range of Cells".

  3. #3
    Registered User MrShadow's Avatar
    Join Date: Jul:2007
    Location:
    Posts: 2,606
    , , . ( ), - , .

    ( MS ) ( ) ...



    : . .


    2: If curCell.Value2! = Null , . .. false. ?
    Last edited by MrShadow; 24th November 2009 at 16:13.

  4. #4
    Registered User
    Join Date: Oct:2003
    Location:
    Posts: 4,317
    named ranges. . , , .. .

  5. #5
    Registered User MrShadow's Avatar
    Join Date: Jul:2007
    Location:
    Posts: 2,606
    :

    Code:
            For Counter = 5 To 12
                Set curCell = Worksheets("Sheet1").Cells(9, Counter)
                If curCell.Value = "" Then
                     Worksheets("M1").Range("A65536").End(xlUp).Offset(1).Value = Worksheets("Sheet1").Range("B5").Value
                     Worksheets("M1").Range("B65536").End(xlUp).Offset(1).Value = Worksheets("Sheet1").Range("E5").Value
                     Worksheets("M1").Range("C65536").End(xlUp).Offset(1).Value = Worksheets("Sheet1").Cell(9, Counter).Value
                     Worksheets("M1").Range("D65536").End(xlUp).Offset(1).Value = Worksheets("Sheet1").Cell(25, Counter).Value
                End If
            Next Counter
    . ..
    Code:
    If curCell.Value = "" Then

    Code:
    If curCell.Value! = "" Then
    , If-a. ?

    : . if-a...
    2: ! <> != ...

    ---------- 17:27 ---------- 16:39 ----------

    :

    Drop down . ( , ).

    (- ).

    : :
    Code:
    Sub Worksheet_Change(ByVal Target As Range)
    Last edited by MrShadow; 24th November 2009 at 18:02.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Copyright © 1999-2011 . .
iskamPC.com | mobility.BG | Bloody's Techblog | | 3D Vision Blog |