Private Sub CommandButton1_Click()
If Cells(1, 1) <> "" Then
Cells(1, 2) = 1
Else
Cells(1, 2) = 2
End If
در دستور فوق به جاي "" <> مي خوام بگم هرتغييري در محتواي (Cells(1, 1 ايجاد شود
شروط را اجرا نمايد
با تشكر از همه دوستان
اخطار: این یک موضوع قدیمی است
به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.