ชื่อควบคุมที่ทำให้แมโครของฉันผิดพลาด


0

ฉันมีมาโครหลายชุดในรูปแบบที่ฉันสร้างขึ้นเพื่อให้ผู้ใช้ในสาขาของฉันใช้ เมื่อพวกเขาเสร็จสิ้นเอกสารและต้องการส่งไปยังคนที่เหมาะสมฉันได้สร้างมาโคร FINISH สิ่งนี้จะทำความสะอาดเอกสารสำหรับพวกเขาโดยทั่วไปลดขนาดไฟล์ลงเหลือประมาณ 50KB จาก 2MB + มาโคร (ด้านล่าง) จะทำสิ่งต่อไปนี้:

A. ) ลบปุ่มควบคุมที่ฉันใส่ไว้ในแบบฟอร์มเพื่อให้พวกเขาใช้เมื่อพวกเขากำลังป้อนข้อมูลของพวกเขา ปุ่มเหล่านี้คือ; ตรึงข้อมูล - แปลงสูตรทั้งหมดในเอกสารให้เป็นข้อความคงที่ บันทึกไฟล์ - ให้ชื่อเฉพาะตามเนื้อหาของเซลล์ในเอกสาร FINISH - ปุ่มที่สอดคล้องกับแมโคร FINISH

B. ) ลบแท็บที่มีข้อมูลดรอปดาวน์อยู่

เมื่อฉันพยายามใช้ปุ่ม FINISH เพื่อเรียกใช้แมโครฉันได้รับข้อความที่ระบุว่า "ไม่สามารถเรียกใช้แมโคร" รูปแบบการประเมิน - 2.xlsm'Button11_Click ' แมโครอาจไม่พร้อมใช้งานในสมุดงานนี้หรือแมโครทั้งหมดอาจถูกปิดใช้งาน "

มาโครในสมุดงาน อย่างไรก็ตามเมื่อฉันดึงรายการมาโครขึ้นมามันจะแสดงให้เห็นอย่างชัดเจนว่ามาโครนั้นอยู่ในสมุดงานนั้น

Sub Finish()
Application.DisplayAlerts = False
'
' Finish Macro
' Finish Document For Sending out
'
'
    Sheets("DropDownData").Select
    ActiveWindow.SelectedSheets.Delete
    ActiveSheet.Shapes.Range(Array("Button 10")).Select
    Selection.Delete
    Selection.Cut
    ActiveSheet.Shapes.Range(Array("Button 11")).Select
    Selection.Delete
    Selection.Cut
    ActiveSheet.Shapes.Range(Array("Button 9")).Select
    Selection.Delete
    Selection.Cut
    Range("A6").Select
Application.DisplayAlerts = True
End Sub

มีใครสามารถช่วยได้บ้าง

คำตอบ:


0

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

โดยการใช้ไซต์ของเรา หมายความว่าคุณได้อ่านและทำความเข้าใจนโยบายคุกกี้และนโยบายความเป็นส่วนตัวของเราแล้ว
Licensed under cc by-sa 3.0 with attribution required.