ทางลัด Excel: สลับไปมาระหว่างแผ่นงานที่ใช้งานล่าสุดและแผ่นงานปัจจุบัน


3

ฉันรู้ว่าทางลัด CRTL + หน้าขึ้น / ลง แต่ฉันต้องการฟังก์ชั่นที่คล้ายกันที่มีอยู่เช่นใน internet explorer: Shift + alt ฉันพบมาโครที่อยู่ใกล้ แต่ไม่สามารถแก้ปัญหาได้ทั้งหมด:

ถ้า ActiveSheet.Name = "สิ่งที่ต้องทำ" จากนั้น         แผ่น ( "งบประมาณ"). เปิดใช้งาน     ElseIf ActiveSheet.Name = "งบประมาณ" จากนั้น         แผ่นงาน ("สิ่งที่ต้องทำ") เปิดใช้งาน

ฉันสามารถตั้งชื่อเซลล์ A1 ด้วยชื่อชีตและใช้การค้นหา (f5) และพิมพ์ชื่อได้ แต่สิ่งนี้จะยุ่งยาก

ความคิดใด ๆ ครับ?

คำตอบ:


1

ทางออกของแดนทำงานได้ หากคุณไม่ต้องการจัดเก็บ LastSheet ในช่วงเซลล์ให้ลอง:

 Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
  ActiveWorkbook.Names.Add Name:="whchSheet", RefersToR1C1:=Sh.Name
 End Sub

ยังคงสร้างฮอตคีย์ตามที่เขาแนะนำ

 Sub MoveToLastSheet()
  Sheets(Application.Evaluate(Names("whchSheet").Value)).Select
 End Sub

1

สิ่งที่ฉันทำ: ใช้ View & gt; Window & gt; New Window เพื่อเปิดสมุดงานปัจจุบันในหน้าต่างแอปพลิเคชันอื่น ใช้แต่ละหน้าต่างเพื่อแสดงแผ่นงานที่คุณกำลังทำงานอยู่ ตอนนี้คุณสามารถสลับไปมาระหว่างพวกเขาโดยใช้ปกติ Alt + แถบ (บน Windows)

วิธีนี้มีประโยชน์อื่น: เวิร์กบุ๊กสามารถเปิดได้มากกว่าสองหน้าต่างโดยแต่ละอันจะแสดงเวิร์กชีทที่แตกต่างกัน

ข้อเสีย (เป็นไปได้) ของวิธีนี้คือคุณอาจจำเป็นต้องได้รับผลกระทบ Alt + แถบ มากกว่าหนึ่งครั้งถ้าหน้าต่างแอปพลิเคชันอื่นเริ่มทำงานตั้งแต่คุณดู Excel ครั้งล่าสุด

อย่างไรก็ตามคุณยังสามารถ:

  • ใช้มุมมองงานเพื่อแสดงหน้าต่างที่เปิดอยู่ทั้งหมดและเลือกได้ง่าย ชนะ + แถบ ;
  • หากคุณทำงานกับแอปพลิเคชัน / เอกสารที่แตกต่างกันจำนวนมากให้วางหน้าต่าง Excel ของคุณไว้ในเดสก์ท็อปเสมือนของตนเอง ขณะที่คุณอยู่ในเดสก์ท็อปนั้น Alt + แถบ จะทำงานได้ดี คุณสามารถเปลี่ยนเป็นเดสก์ท็อป 'ก่อนหน้า' โดยใช้ ชนะ + Ctrl + ซ้าย จากนั้นทำเช่นนั้นอีกครั้งเพื่อกลับไปที่เดสก์ท็อปที่มีหน้าต่าง Excel ถ้าฉันกำลังทำงานในโครงการฉันมักจะใส่ 'แอปทั่วไป' (เบราว์เซอร์อีเมล OneNote) ไว้ในเดสก์ท็อปเสมือนหนึ่งและมีเดสก์ท็อปที่แตกต่างกันสำหรับแต่ละโครงการ
  • หากคุณเปิดหน้าต่าง Excel หลายหน้าต่างและถูกจัดกลุ่มเข้าด้วยกันในแถบงานคุณสามารถวนไปตามหน้าต่าง (ตามลำดับที่เปิดใช้งานล่าสุด) โดย Ctrl + Click กดปุ่มทาสก์บาร์ที่จัดกลุ่มไว้

เห็นได้ชัดว่าแต่ละวิธีมีข้อดีข้อเสียแตกต่างกันไปขึ้นอยู่กับจำนวนแอปพลิเคชันและเอกสารที่คุณเปิดและวิธีที่คุณต้องการโต้ตอบกับพวกเขา


0

หากคุณต้องการเพิ่มปุ่มลัดเพื่อสลับไปยังชีตก่อนหน้าของคุณก่อนอื่นให้สร้างเซลล์ที่ชื่อว่า "LastSheet" เพื่อเก็บค่าของชีตสุดท้าย จากนั้นวางสิ่งนี้ลงใน ThisWorkbook ของคุณ:

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Range("LastSheet").Value = Sh.Name
End Sub

ตอนนี้ใน Module1 วางรหัสนี้:

Sub MoveToLastSheet()
Sheets(Range("LastSheet").Value).Select
End Sub

สร้างฮอตคีย์สำหรับมาโคร MoveToLastSheet และคุณทำเสร็จแล้ว ตอนนี้จะนำคุณไปยังชีตก่อนหน้าที่คุณเยี่ยมชม

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