Snasui Excel Forum

ขอโทษนะคะ

รบกวนตรวจสอบอีกทีค่ะ ^^

Private Sub ComboBox1_Change()

If ComboBox1.Value = "Saraburi" Then
Range("A5:F7").Value = "=Formula1"
End If
If ComboBox1.Value = "Bangkok" Then
Range("Bangkok!A5:F7").Value = "=Formula2"
End If
If ComboBox1.Value = "Lopburi" Then
Range("Lopburi!A5:F7").Value = "=Formula2"
End If

End Sub ...

Private Sub ComboBox1_Change()

If ComboBox1.Value = "Saraburi" Then
Range("A5:F7").Value = "=Formula1"
End If
If ComboBox1.Value = "Bangkok" Then
Range("Bangkok!A5:F7").Value = "=Formula2"
End If
If ComboBox1.Value = "Lopburi" Then
Range("Lopburi!A5:F7").Value = "=Formula2"
End If

End Sub

ที่เข ...

สอบถามหน่อยค่ะ
ถ้าเราต้องการให้ ข้อมูลเปลี่ยนไป ตาม ComboBox สามารถเขียนสูตร VBA ได้อย่างไรคะ
ตัวอย่างเช่น

ใน Combobox มีค่า
= Saraburi
= Bangkok
= Lopburi

Sheet มีทั้งหมด 3 sheet คือ
= Saraburi
= Bangkok
= Lopburi

โดยข้อมูลในแต่ละ Sheet ไม่เท่ากัน

เราสามารถโชว์ข้อมูล แต่ละ Sheet โดยการเลือก ...