String Manupulation ใน VBA
ฉันมีคอลัมน์เดียวที่ต้องแยกเป็นหลายคอลัมน์เช่น Text-to-Column ใน excel อย่างไรก็ตามมีความท้าทายเล็กน้อย ตัวคั่นธรรมดาจะไม่ทำงาน พิจารณาสตริงด้านล่าง Original: Domain\Domain Admins Domain2\User Group Domain3\Developers .....(And so on) Required: Domain\Domain Admins | Domain2\User Group | Domain3\Developers .....(And so on) ไพพ์ในสตริงที่ต้องการหมายความว่าต้องแยกที่นี่และคัดลอกไปยังคอลัมน์ถัดไปตามความยาวของสตริง ฉันมีรายการในคอลัมน์ A ที่มี 506 แถว ฉันใช้สูตรต่อไปนี้เพื่อตรวจสอบการเกิดขึ้นของ "\" ฉันคอลัมน์ B นับช่วงตั้งแต่ 0-66 =LEN(A2)-LEN(SUBSTITUTE(A2,"\","")) ฉันต้องการความช่วยเหลือในการเขียนโค้ดตามตรรกะ ค้นหา "\" ในสตริง ค้นหาช่องว่างก่อน "\" และแยก ฉันใช้รหัสต่อไปนี้ แต่ไม่ได้มีวัตถุประสงค์ Range("A1:A506").Select …