Page 1 of 1

ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Wed Mar 20, 2024 1:06 pm
by suka
สวัสดีค่ะ
ขอความช่วยเหลือปรับโค้ด VBA เนื่องจากนำไฟล์ Excel 2007 มาใช้กับ Excel 2021 รันโค้ดแล้วเกิด Error ตามรูปแนบค่ะ
ขอช่วยแนะนำการปรับโค้ดและการตั้งค่าให้พร้อมใช้งาน Excel 2007 และ Excel 2021 ค่ะ

Code: Select all

Sub Now()
        Dim formBook As Workbook
        Set formBook = ThisWorkbook
        Application.ScreenUpdating = False
        Application.Calculation = xlCalculationManual
        formBook.Sheets("Form").Range("Q2").Formula = "=TEXT(NOW(),""m;;"")"
        formBook.Sheets("Form").Range("R2").Formula = "=TEXT(NOW(),""yyyy;;"")"
        formBook.Sheets("Form").Range("P1").Formula = "=DAY(DATE(R1,Q1,1))"
        formBook.Sheets("Form").Range("P2").Formula = "=DAY(DATE(R2,Q2+1,0))"
        Application.Calculation = xlCalculationAutomatic
        Application.ScreenUpdating = True
End Sub

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Wed Mar 20, 2024 3:23 pm
by puriwutpokin
แก้ชื่อชีทให้ถูกต้องครับจาก Form เป็น From

Code: Select all

formBook.Sheets("Form").Range("Q2").Formula = "=TEXT(NOW(),""m;;"")"
เป็น

Code: Select all

formBook.Sheets("From").Range("Q2").Formula = "=TEXT(NOW(),""m;;"")"
แก้ทุกตัวนะครับ

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Wed Mar 20, 2024 4:09 pm
by suka
ขออภัยค่ะ คีย์ชื่อชีทผิดค่ะ ขอบคุณมากค่ะคุณ puriwutpokin

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Wed Mar 20, 2024 4:20 pm
by suka
ขอช่วยแนะนำการตั้งค่าให้พร้อมใช้งาน Excel 2007 และ Excel 2021 ที่ถูกต้องควรปรับและติ๊กที่ใดอย่างไรให้ด้วยนะคะ

ตัวอย่างรูปแนบควรติ๊กที่ใดดีคะ และควรปรับที่แทบใดเพิ่มเติมไหมคะ

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Wed Mar 20, 2024 6:08 pm
by puriwutpokin
ไฟล์​ที่ใช้ อยู่ใน เซิร์ฟเวอร์​หรือเปล่าครับ
ถ้าไม่ใช่การติ๊กค่าตามรูปก็ถูกแล้วครับ

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Thu Mar 21, 2024 3:08 pm
by suka
ค่ะ ขอบคุณมากค่ะคุณ puriwutpokin

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Mon Mar 25, 2024 5:15 pm
by suka
สวัสดีค่ะ ขออนุญาตใช้กระทู้เดิมนี้ถามต่อนะคะ

EXCE 2021 ต้องการกำหนดไฟล์พื่อใช้งานร่วมกันในวงแลน เข้ากำหนดที่เมนูไหนได้คะ

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Mon Mar 25, 2024 5:28 pm
by puriwutpokin
puriwutpokin wrote: Wed Mar 20, 2024 6:08 pm ไฟล์​ที่ใช้ อยู่ใน เซิร์ฟเวอร์​หรือเปล่าครับ
ถ้าไม่ใช่การติ๊กค่าตามรูปก็ถูกแล้วครับ
ถ้าหมายถึง กระทู้นี้ ดูตามภาพครับ ที่ Control Panel เซ็ตตามรูปครับ

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Mon Mar 25, 2024 7:06 pm
by suka
ได้เข้าที่ Control Panel เลือก Internet Options เลือกแทบ Security เลือก Local intranet แล้วกด Sites

ป๊อปอัพขี้นตามรูปแนบอันบนค่ะ และลองกดปุ่ม Advanced ก็ได้ตามรูปอันล่างค่ะ

ตามรูปแนบควรทำอย่างรต่อคะ

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Mon Mar 25, 2024 7:29 pm
by puriwutpokin
ไฟล์ที่เป็น VBA อยู่ที่ Path ไหนก็ Copy ไว้ช่อง Add this website to zone ตามตัวอย่าง​ครับ ที่Server \\xxx.xxx.xxx.xxx

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Tue Mar 26, 2024 6:48 pm
by suka
Excel 2007 เมื่อต้องการให้ใช้ไฟล์งานร่วมกันได้ สามารถกำหนดได้ที่เมนู Review แล้วเลือกแชร์สมุดงานได้ตามรูปแนบที่ใส่กรอบสีเขียวค่ะ

แต่ Excel 2021 เข้าเมนู Review แล้วที่ต้องการเลือกเพื่อให้ใช้ไฟล์ร่วมกันได้เป็นแทบที่เทาเข้าไม่ได้ค่ะ

ตามรูปแนบที่ใส่กรอบสีแดงค่ะ ตามนี้ควรแก้อย่างไคะ

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Tue Mar 26, 2024 6:55 pm
by suka
puriwutpokin wrote: Mon Mar 25, 2024 7:29 pm ไฟล์ที่เป็น VBA อยู่ที่ Path ไหนก็ Copy ไว้ช่อง Add this website to zone ตามตัวอย่าง​ครับ ที่Server \\xxx.xxx.xxx.xxx
หรือต้องกำหนดค่าตามนี้ก่อนคะ

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Tue Mar 26, 2024 8:32 pm
by puriwutpokin
ไฟล์ที่เป็นแบบแชร์ ร่วมกันจะไม่สามารถรัน vba ได้ครับ

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Tue Mar 26, 2024 9:20 pm
by suka
ค่ะ ไฟล์ที่แชร์ร่วมกันไม่รัน vba ค่ะ เป็นไฟล์ .xlsx ค่ะะ โดยจะรัน vba ผ่านไฟล์ .xlsm ค่ะ

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Wed Mar 27, 2024 12:52 pm
by puriwutpokin
suka wrote: Tue Mar 26, 2024 9:20 pm ค่ะ ไฟล์ที่แชร์ร่วมกันไม่รัน vba ค่ะ เป็นไฟล์ .xlsx ค่ะะ โดยจะรัน vba ผ่านไฟล์ .xlsm ค่ะ
ลองทำตามรูปนี้ดูครับ

Re: ขอวิธีปรับ Excel VBA ให้พร้อมใช้กับ Excel 2007 และ 2021 ค่ะ

Posted: Wed Mar 27, 2024 8:08 pm
by suka
ได้ตรงตามต้องการแล้วค่ะ ขอบคุณมากค่ะคุณ puriwutpokin