سلام
من دو تا سوال دارم از اساتيد محترم در صورت امكان پاسخ بدن

1- چرا كد زير عمل نميكند و شكل صحيحي آن بايد چگونه باشد

Private Sub TextBox1_inter()
TextBox3.SetFocus
End Sub

2- همچنين چرا كدزير در vba عمل نميكند و شكل صحيح آن چگونه است
Private Sub CommandButton1_Click()
textbox1.value = "=max(sheets("1").range(cells(1,1),cells(10,1) ))"
End Sub
اخطار: این یک موضوع قدیمی است
به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.