รบกวนผู้รู้ด้วยค่ะ YY
Posted: Fri Oct 21, 2016 10:30 pm
พยายามคิดแล้ว แต่คิดไม่ออกจริงๆค่ะ รบกวนทุกๆท่านด้วยนะคะ
1.เดียอยากให้เมื่อกดปุ่ม Gen packing list no. แล้วชีทที่เดียระบุไว้ใน Q20 รันตรงตัวอักษร /01 รันเป็น 02,03,04 ตามที่เดียจะกำหนดใน Q20 ค่ะ
2.เดียอยากให้ตรง Net weight ไปLink กับชีทที่เดีย Gen packing list no. ออกมาค่ะ
1.เดียอยากให้เมื่อกดปุ่ม Gen packing list no. แล้วชีทที่เดียระบุไว้ใน Q20 รันตรงตัวอักษร /01 รันเป็น 02,03,04 ตามที่เดียจะกำหนดใน Q20 ค่ะ
2.เดียอยากให้ตรง Net weight ไปLink กับชีทที่เดีย Gen packing list no. ออกมาค่ะ
Code: Select all
Sub test()
Dim wb1 As Workbook
Dim strShName As String
Set wb1 = ThisWorkbook
strShName = wb1.Sheets("Invoice").Range("Q20")
Sheets("1").Copy after:=Sheets(Sheets.Count)
ActiveSheet.Name = wb1.Sheets("Invoice").Range("Q20")
End Sub
ช่วยโพสต์ใหม่ โดยเขียนหัวกระทู้ให้สื่อถึงปัญหาที่จะถามเพื่อสะดวกในการค้นหาในภายหลังครับ