Note: The other languages of the website are Google-translated. Back to English

วิธีป้องกันเซลล์ตามวันที่ใน Excel

โดยปกติเราสามารถป้องกันแผ่นงานเพื่อป้องกันไม่ให้ผู้อื่นแก้ไขหรือแก้ไขค่าของเซลล์ แต่บางครั้งคุณต้องป้องกันเซลล์ตามวันที่ ตัวอย่างเช่นฉันต้องการปกป้องเซลล์อื่น ๆ แต่อนุญาตให้แก้ไขเฉพาะค่าเซลล์ของวันที่ของวันนี้ตามภาพหน้าจอต่อไปนี้บทความนี้จะพูดถึงวิธีการป้องกันเซลล์ตามวันที่

doc ป้องกันภายในวันที่ 1

ปกป้องแถวทั้งหมดยกเว้นแถววันที่ของวันนี้ด้วยรหัส VBA

ป้องกันแถวทั้งหมดที่วันที่ผ่านไปด้วยรหัส VBA


ลูกศรสีฟ้าฟองขวา ปกป้องแถวทั้งหมดยกเว้นแถววันที่ของวันนี้ด้วยรหัส VBA

อนุญาตให้แก้ไขเฉพาะแถวที่เท่ากับวันที่ของวันนี้รหัสต่อไปนี้สามารถช่วยคุณได้โปรดดำเนินการดังนี้:

1. คลิกขวาที่แท็บแผ่นงานที่คุณต้องการป้องกันเซลล์ตามวันที่จากนั้นเลือก ดูรหัส จากเมนูบริบทในป๊อปอัป Microsoft Visual Basic สำหรับแอปพลิเคชัน โปรดคัดลอกและวางรหัสต่อไปนี้ลงในโมดูลว่าง:

รหัส VBA: ปกป้องแถวทั้งหมดยกเว้นแถววันที่ของวันนี้:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice 20161025
    If Range("E" & Selection.Row).Value <> Date Then
        ActiveSheet.Protect Password:="111111"
        MsgBox "Only today's date row can be edited!", vbInformation, "Kutools for Excel"
    ElseIf Range("E" & Selection.Row).Value = Date Then
        ActiveSheet.Unprotect Password:="111111"
        ActiveSheet.EnableSelection = xlNoRestrictions
    End If
End Sub

doc ป้องกันภายในวันที่ 2

หมายเหตุ: ในรหัสด้านบนตัวอักษร E คือส่วนหัวของคอลัมน์ที่มีวันที่ "111111” คือรหัสผ่านเพื่อป้องกันแผ่นงานนี้ คุณสามารถเปลี่ยนได้ตามความต้องการของคุณ

2. จากนั้นบันทึกและปิดหน้าต่างรหัสนี้

(1. ) หากคุณคลิกเซลล์อื่นนอกเหนือจากแถววันที่ของวันนี้กล่องพร้อมต์จะปรากฏขึ้นเพื่อเตือนคุณว่าไม่สามารถแก้ไขเซลล์ได้โปรดดูภาพหน้าจอ:

doc ป้องกันภายในวันที่ 3

(2. ) หากคุณคลิกและแก้ไขแถวที่เท่ากับวันที่ของวันนี้จะได้รับการแก้ไขสำเร็จดูภาพหน้าจอ:

doc ป้องกันภายในวันที่ 4


ลูกศรสีฟ้าฟองขวา ป้องกันแถวทั้งหมดที่วันที่ผ่านไปด้วยรหัส VBA

หากคุณต้องการป้องกันแถวทั้งหมดที่วันที่ผ่านไปอนุญาตให้แก้ไขเฉพาะแถววันที่วันนี้และในอนาคตเท่านั้นโปรดใช้รหัส VBA ต่อไปนี้:

1. คลิกขวาที่แท็บแผ่นงานที่คุณต้องการป้องกันเซลล์ตามวันที่จากนั้นเลือก ดูรหัส จากเมนูบริบทในป๊อปอัป Microsoft Visual Basic สำหรับแอปพลิเคชัน โปรดคัดลอกและวางรหัสต่อไปนี้ลงในโมดูลว่าง:

รหัส VBA: ป้องกันวันที่แถวทั้งหมดผ่านไป:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
'Updateby Extendoffice 20161025
  Dim xRow As Long
  xRow = 2
  ThisWorkbook.ActiveSheet.Unprotect Password:="111111"
  ThisWorkbook.ActiveSheet.Cells.Locked = False
  Do Until IsEmpty(Cells(xRow, 5))
    If Cells(xRow, 5) < Date Then
      Rows(xRow).Locked = True
    End If
    xRow = xRow + 1
  Loop
  ThisWorkbook.ActiveSheet.Protect Password:="111111"
End Sub

doc ป้องกันภายในวันที่ 5

หมายเหตุ: ในรหัสด้านบนหมายเลข 5 คือหมายเลขคอลัมน์ที่มีวันที่ "111111” คือรหัสผ่านเพื่อป้องกันแผ่นงานนี้ คุณสามารถเปลี่ยนได้ตามความต้องการของคุณ

3. จากนั้นบันทึกและปิดหน้าต่างรหัสนี้

(1. ) หากคุณคลิกวันที่ของเซลล์ได้ผ่านไปแล้วกล่องพร้อมต์จะปรากฏขึ้นเพื่อเตือนว่าคุณไม่สามารถแก้ไขเซลล์ได้โปรดดูภาพหน้าจอ:

doc ป้องกันภายในวันที่ 6

(2. ) หากคุณคลิกเซลล์ของแถวเพื่อพยายามเปลี่ยนค่าในวันที่ของวันนี้หรือวันที่ในอนาคตจะมีการแก้ไขสำเร็จดูภาพหน้าจอ:

doc ป้องกันภายในวันที่ 7


เครื่องมือเพิ่มประสิทธิภาพการทำงานในสำนักงานที่ดีที่สุด

Kutools สำหรับ Excel แก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%

  • นำมาใช้ใหม่: ใส่อย่างรวดเร็ว สูตรที่ซับซ้อนแผนภูมิ และสิ่งที่คุณเคยใช้มาก่อน เข้ารหัสเซลล์ ด้วยรหัสผ่าน; สร้างรายชื่อผู้รับจดหมาย และส่งอีเมล ...
  • ซุปเปอร์ฟอร์มูล่าบาร์ (แก้ไขข้อความและสูตรหลายบรรทัดได้อย่างง่ายดาย); การอ่านเค้าโครง (อ่านและแก้ไขเซลล์จำนวนมากได้อย่างง่ายดาย); วางลงในช่วงที่กรองแล้ว...
  • ผสานเซลล์ / แถว / คอลัมน์ โดยไม่สูญเสียข้อมูล แยกเนื้อหาของเซลล์ รวมแถว / คอลัมน์ที่ซ้ำกัน... ป้องกันเซลล์ซ้ำ; เปรียบเทียบช่วง...
  • เลือกซ้ำหรือไม่ซ้ำ แถว; เลือกแถวว่าง (เซลล์ทั้งหมดว่างเปล่า); Super Find และ Fuzzy Find ในสมุดงานจำนวนมาก สุ่มเลือก ...
  • สำเนาถูกต้อง หลายเซลล์โดยไม่เปลี่ยนการอ้างอิงสูตร สร้างการอ้างอิงอัตโนมัติ ถึงหลายแผ่น ใส่สัญลักษณ์แสดงหัวข้อย่อย, กล่องกาเครื่องหมายและอื่น ๆ ...
  • แยกข้อความ, เพิ่มข้อความ, ลบตามตำแหน่ง, ลบ Space; สร้างและพิมพ์ผลรวมย่อยของเพจ แปลงระหว่างเนื้อหาของเซลล์และความคิดเห็น...
  • ซุปเปอร์ฟิลเตอร์ (บันทึกและใช้โครงร่างตัวกรองกับแผ่นงานอื่น ๆ ); การเรียงลำดับขั้นสูง ตามเดือน / สัปดาห์ / วันความถี่และอื่น ๆ ตัวกรองพิเศษ โดยตัวหนาตัวเอียง ...
  • รวมสมุดงานและแผ่นงาน; ผสานตารางตามคอลัมน์สำคัญ แยกข้อมูลออกเป็นหลายแผ่น; Batch แปลง xls, xlsx และ PDF...
  • คุณสมบัติที่ทรงพลังมากกว่า 300 รายการ. รองรับ Office/Excel 2007-2021 และ 365 รองรับทุกภาษา ง่ายต่อการปรับใช้ในองค์กรหรือองค์กรของคุณ คุณสมบัติเต็มรูปแบบ ทดลองใช้ฟรี 30 วัน รับประกันคืนเงินภายใน 60 วัน
kte แท็บ 201905

แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
ด้านล่าง officetab
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (30)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ช่องโหว่: บุคคลอื่นสามารถเห็นรหัสผ่านได้โดยใช้ตัวเลือก "ดูรหัส"
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ไม่ทำงานเนื่องจากทุกเซลล์แสดงข้อความแต่สามารถแก้ไขได้
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี เป็นไปได้ไหมที่จะล็อกคอลัมน์ตามวันที่ที่อยู่เหนือคอลัมน์โดยตรง
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
แผ่นงานย่อยส่วนตัว_เปลี่ยน (ByVal Target As Range)

'ติดตาม http://youtube.com/excel10tutorial

'สนับสนุนช่องด้วยการบริจาคได้ที่ http://patreon.com/excel10tutorial

Dim col เป็นช่วง

'ตั้งชื่อแผ่นงานที่ถูกต้องที่นี่:

ด้วย ThisWorkbook.Sheets("AGOSTO-22")

.Unprotect "ABCDE"

สำหรับแต่ละ col In .UsedRange.Columns

col.EntireColumn.Locked = col.Range("A1")).Value <> วันที่

ถัดไป col

.ปกป้อง "ABCDE"

.EnableSelection = xlNoRestrictions

จบด้วย

ย่อยสิ้นสุด
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี เป็นไปได้ไหมที่จะล็อกเซลล์บางเซลล์โดยขึ้นอยู่กับวันที่ที่อยู่เหนือเซลล์เหล่านั้นในคอลัมน์โดยตรง
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ลูซิส
คุณช่วยบอกปัญหาของคุณให้เจาะจงกว่านี้ได้ไหม หรือคุณสามารถแนบภาพหน้าจอเป็นปัญหาของคุณ
ขอขอบคุณ!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี skyyang

ใช่นี่คือภาพหน้าจอ หวังว่านี่จะช่วยได้
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
นี่มันคือ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีคุณลูซิส
คุณหมายถึงการล็อกคอลัมน์ซึ่งวันที่ที่ผ่านไปแล้ว และแก้ไขเฉพาะคอลัมน์ของวันนี้และวันข้างหน้าได้หรือไม่
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ถูกต้อง! ฉันจะไปเกี่ยวกับที่?
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี หลุยส์
แล้วเซลล์วันที่ใน A1 ล่ะ? ป้อนด้วยตนเองหรือป้อนด้วยสูตร =now()? ถ้าเป็นเซลล์สูตร คอลัมน์ที่ล็อกไว้จะเปลี่ยนไปตามวันที่ที่เปลี่ยนไป
รอการตอบกลับของคุณ!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี สกายยังง

ใช่ เซลล์ A1 มีสูตร =now()

ขอบคุณ!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี.....


ฉันกำลังใช้รหัสป้องกันแถวทั้งหมดยกเว้นแถววันที่ของวันนี้........



แผ่นงานย่อยส่วนตัว_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice 20161025
ถ้า Range("A" & Selection.Row).Value <> Date แล้ว
ActiveSheet.Protect รหัสผ่าน:="111111"
MsgBox "เฉพาะแถววันที่ของวันนี้เท่านั้นที่สามารถแก้ไขได้!", vbInformation, "Kutools for Excel"
ช่วง ElseIf ("E" & Selection.Row).Value = วันที่แล้ว
ActiveSheet.Unprotect รหัสผ่าน:="111111"
ActiveSheet.EnableSelection = xlNoRestrictions
End If
ย่อยสิ้นสุด


หลังจากที่ฉันบันทึกฉันและคลิกที่เซลล์ ฉันได้รับข้อความเฉพาะแถววันที่ของวันนี้เท่านั้นที่สามารถแก้ไขได้....แต่ถ้าฉันดับเบิลคลิกที่เซลล์ ฉันสามารถแก้ไขได้...โปรดช่วยด้วย
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
มันใช้งานได้ดี แต่ฉันจะสลับเพื่อปลดล็อกคอลัมน์ตามวันที่ในแถวที่ 3 ได้อย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ในฐานะคนที่ค่อนข้างใหม่กับ VBA คุณช่วยอธิบายได้ไหมว่าทำไม xRow = 2 ในบรรทัดที่ 4



ขอบคุณ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
เพราะอยู่ในแถวที่ 1 คุณมีส่วนหัว
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี

ขณะเรียกใช้รหัสนี้ ฉันได้รับข้อผิดพลาดดังแสดงในรูป
ฉันกำลังแนบสแน็ปช็อต excel ของฉันซึ่งฉันต้องการทำการเปลี่ยนแปลง ..

คุณช่วยแนะนำในรหัสของฉันได้ไหมว่าฉันควรเปลี่ยนแปลงอะไรตามไฟล์ excel ของฉันเพื่อให้เซลล์ที่มีเฉพาะวันนี้และวันที่ในอนาคตสามารถแก้ไขได้ ???
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีคะรัน
เนื่องจากมีเซลล์ที่ผสานในตารางของคุณ โค้ดข้างต้นจึงไม่สามารถใช้อย่างถูกต้องในตารางเซลล์ที่ผสาน
หากคุณมีความคิดที่ดีอื่น ๆ โปรดแสดงความคิดเห็นที่นี่ ขอขอบคุณ!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ฉันพยายามทำเช่นเดียวกัน แต่เพื่อป้องกันคอลัมน์ทั้งหมดยกเว้นคอลัมน์วันที่ของวันนี้ด้วยรหัส VBA โดยแทนที่ "Selection.Row" ด้วย "Selection.Columns" และ "E" ด้วย "5" (หมายเลขแถวที่มีวันที่) แต่ ฉันได้รับข้อผิดพลาด 1004 อยู่เรื่อยๆ!

กรุณาช่วย?

ขอขอบคุณ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ฉันพยายามทำเช่นเดียวกัน แต่เพื่อป้องกันคอลัมน์ทั้งหมดยกเว้นคอลัมน์วันที่ของวันนี้ด้วยรหัส VBA โดยแทนที่ "Selection.Row" ด้วย "Selection.Columns" และ "E" ด้วย "5" (หมายเลขแถวที่มีวันที่) แต่ ฉันได้รับข้อผิดพลาด 1004 อยู่เรื่อยๆ!

กรุณาช่วย?

ขอขอบคุณ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี,
หากต้องการใช้รหัสนี้กับคอลัมน์ที่คุณต้องการ โปรดใช้รหัส VBA ต่อไปนี้:(หมายเหตุ: ในรหัส 5 คือหมายเลขแถวที่มีวันที่ โปรดเปลี่ยนตามความต้องการของคุณ)

แผ่นงานย่อยส่วนตัว_SelectionChange(ByVal Target As Range)
Dim xRg เป็นช่วง
ตั้งค่า xRg = Target.Worksheet.Cells (5, Target.Column)
ถ้า xRg <> วันที่ แล้ว
ActiveSheet.Protect รหัสผ่าน:="111111"
MsgBox "เฉพาะแถววันที่ของวันนี้เท่านั้นที่สามารถแก้ไขได้!", vbInformation, "Kutools for Excel"
ElseIf xRg.Value = วันที่แล้ว
ActiveSheet.Unprotect รหัสผ่าน:="111111"
ActiveSheet.EnableSelection = xlNoRestrictions
End If
ย่อยสิ้นสุด

โปรดลอง หวังว่าจะช่วยคุณได้!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอขอบคุณ! ขออภัย ฉันไม่ได้รับการตอบกลับของคุณจนถึงขณะนี้ อาจมีปัญหาในอีเมลของฉัน

มันได้ผล! ไม่สามารถพูดขอบคุณได้มากพอ! ฉันซาบซึ้งจริงๆ!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี
ดีใจที่สามารถช่วยคุณได้!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี

ฉันกำลังพยายามขยายสิ่งนี้เพื่อป้องกันคอลัมน์ที่ไม่รวมเดือนปัจจุบันหรือ/และสัปดาห์ปัจจุบันนี้ ฉันพยายามแทนที่ "วันที่" ด้วย "เดือน" หรือ "สัปดาห์" แต่ไม่ได้ผล

ฉันได้แนบตัวอย่างแผ่นงานสัปดาห์ที่ผู้ใช้ไม่สามารถแก้ไขหรือพิมพ์ในคอลัมน์อื่นนอกเหนือจากสัปดาห์นี้

คำแนะนำใด ๆ เกี่ยวกับเรื่องนั้น? หรือฉันจะใช้วันที่จริงเพื่อสะท้อนวันในเดือน?
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณสำหรับความช่วยเหลือของคุณ ขอบคุณมากเพื่อน มันเป็นความช่วยเหลือที่ดี และแก้ไขความตึงเครียดของฉัน
ปลอดภัย
ขอแสดงความนับถือ Rohit Khanna
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ฉันประสบปัญหาหนึ่ง เมื่อฉันปิดไฟล์และเปิดใหม่อีกครั้งในวันเดียวกัน รหัสจะไม่ทำงาน กรุณาช่วยฉันติดอยู่
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดีค่ะ คุณโรหิต
หากต้องการเก็บโค้ดนี้ คุณควรบันทึกเวิร์กบุ๊กของคุณเป็นรูปแบบ Excel Macro-Enabled Workbook โปรดลอง ขอขอบคุณ!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ฉันทำได้แล้ว แต่เมื่อฉันกดเซลล์ ข้อความแสดงว่าไม่สามารถแก้ไขได้ แต่เมื่อฉันกดแป้นพิมพ์ ฉันยังสามารถเขียนลงในเซลล์ได้
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ฉันต้องการปกป้องวันข้างหน้าและอนุญาตให้แก้ไขวันปัจจุบันและวันที่ผ่านมา ฉันจะทำอย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี มิเกล เพื่อปกป้องวันข้างหน้า โปรดใช้รหัสด้านล่าง: แผ่นงานย่อยส่วนตัว_เปลี่ยน (ByVal กำหนดเป้าหมายเป็น Excel.Range)
'Updateby Extendoffice
Dim xRow ตราบใดที่
xRow = 2
ThisWorkbook.ActiveSheet.Unprotect รหัสผ่าน:="111111"
ThisWorkbook.ActiveSheet.Cells.Locked = False
ทำจนกว่าจะว่าง(เซลล์(xRow, 5))
ถ้า Cells(xRow, 5) > Date แล้ว
แถว (xRow) ล็อค = จริง
End If
xRow = xRow + 1
ห่วง
ThisWorkbook.ActiveSheet.Protect รหัสผ่าน:="111111"
End Sub โปรดลอง หวังว่าจะช่วยคุณได้!
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ

ช่องทางอื่นๆ

ลิขสิทธิ์© 2009 - wwwextendoffice.com | สงวนลิขสิทธิ์. ขับเคลื่อนโดย ExtendOffice. | แผนผังเว็บไซต์
Microsoft และโลโก้ Office เป็นเครื่องหมายการค้าหรือเครื่องหมายการค้าจดทะเบียนของ Microsoft Corporation ในสหรัฐอเมริกาและ / หรือประเทศอื่น ๆ
ได้รับการปกป้องโดย Sectigo SSL