اجرای خودکار کد

Collapse
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • ali.b

    • 2014/01/12
    • 798

    اجرای خودکار کد

    چکار کنم این کد خودکار انجام بشه
    این کد واسه رنگی کردن ردیفی که اون سلول رو انحتخاب میکنید هست
    کد:
    Sub Macro4()'
    ' Macro4 Macro
    '
    
    
    Static rr
    If rr <> "" Then
    With Rows(rr).Interior
    .ColorIndex = xlNone
    End With
    End If
    
    
    r = Selection.Row
    rr = r
    
    
    With Rows(r).Interior
    .ColorIndex = 6
    .Pattern = xlSolid
    End With
    End Sub
    [CENTER]
    [/CENTER]
  • khakzad

    • 2010/03/17
    • 2034
    • 85.00

    #2
    سلام
    برای اینکه کد با هر باز کلیک کردن روی سل اجرا بشه . این کد رو در selection change بنویسید
    [CENTER][B][COLOR=#008000][SIZE=3]محصولات و جزوات آموزش تخصصی [URL="https://excelpedia.net/"]اکسل[/URL] در:

    [URL="https://excelpedia.net/category/excel-functions/"]برترین مرجع تخصصی پارسی اکسل[/URL]
    [URL="http://www.exceliran.com/shop/"]جامعه اكسل ايرانيان: فروشگاه[/URL][/SIZE][/COLOR][/B]
    :wcom:

    [B][URL="https://excelpedia.net/"]آموزش اکسل تخصصی[/URL] و [URL="https://excelpedia.net/excel-ninja/"]پیشرفته[/URL] - [URL="https://excelpedia.net/"]تهران[/URL][/B]
    [EMAIL="h.khakzad@yahoo.com"]h.khakzad@yahoo.com[/EMAIL]
    [/CENTER]

    کامنت

    • khakzad

      • 2010/03/17
      • 2034
      • 85.00

      #3
      اینم عکس مسیری که خواسته بودیدClick image for larger version

Name:	selection.jpg
Views:	1
Size:	113.2 کیلو بایت
ID:	123011
      [CENTER][B][COLOR=#008000][SIZE=3]محصولات و جزوات آموزش تخصصی [URL="https://excelpedia.net/"]اکسل[/URL] در:

      [URL="https://excelpedia.net/category/excel-functions/"]برترین مرجع تخصصی پارسی اکسل[/URL]
      [URL="http://www.exceliran.com/shop/"]جامعه اكسل ايرانيان: فروشگاه[/URL][/SIZE][/COLOR][/B]
      :wcom:

      [B][URL="https://excelpedia.net/"]آموزش اکسل تخصصی[/URL] و [URL="https://excelpedia.net/excel-ninja/"]پیشرفته[/URL] - [URL="https://excelpedia.net/"]تهران[/URL][/B]
      [EMAIL="h.khakzad@yahoo.com"]h.khakzad@yahoo.com[/EMAIL]
      [/CENTER]

      کامنت

      چند لحظه..