کپی فرمت سلول های مورد نظر یک شیت به شیت دیگر

Collapse
این تاپیک قفل است.
X
X
Collapse
 
  • صفحه از 1
  • زمان
  • نمایش
حذف همه
new posts
قبلی template بعدی
  • fimani119

    • 2018/11/10
    • 27
    • 29.00
    #1

    [حل شده] کپی فرمت سلول های مورد نظر یک شیت به شیت دیگر

    سلام و وقت بخیر
    چه فرمولی میتونم بنویسم که وقتی داده ای از یک شیت به شیت دیگه کپی میشه فرمت سلول ها هم منتقل بشن؟
    ممنون میشم کمکم کنید.یه قسمت از کدم به این شکله:
    کد:
    j = 7
For i = 8 To z1


If Left(Sheet1.Cells(i, 2), 3) = 193 And Sheet1.Cells(i, 4) <> 10383 Then
j = j + 1

For k = 1 To 15

Sheet2.Cells(j, k) = Sheet1.Cells(i, k)
Next k
End If
Next i
    Last edited by Amir Ghasemiyan; 2020/03/03, 14:49. دلیل: قرار دادن كدها در تگ مربوطه
    برچسب ها: هیچ‌کدام
    • Amir Ghasemiyan

      • 2013/09/20
      • 4598
      • 100.00
      #2
      سلام دوست عزيز
      بجاي اين خط كد:
      کد:
      Sheet2.Cells(j, k) = Sheet1.Cells(i, k)
      اين رو قرار بديد:

      کد:
      Sheet1.Cells(i, k).Copy Sheet2.Cells(j, k)

        کامنت

        قبلی template بعدی
        چند لحظه..