Текст тилкесиндеги текстти кантип бөлүп алса болот

Менде жөнөкөй маселе бар, мен аны VBA колдонбостон чечем деп үмүттөнүп жатам, бирок аны чечүүнүн бирден-бир жолу ушул болсо, ошондой болсун.

Менде бир нече катардан турган файл бар (бардыгы бир тилке). Ар бир сапта мындай көрүнүштө болгон маалыматтар бар:

1 7.82E-13> gi | 297848936 | ref | XP_00 | 4-гидроксид ги | 297338191 | gb | 23343 | randomrandom

2 5.09E-09> gi | 168010496 | ref | xp_00 | 2-пируват

ж.б. ...

Менин оюмча, "gi |" менен башталган сандардын саптарын бөлүп алуунун жолу. жана "|" менен аяктайт. Айрым катарлар үчүн бул 5 ги номерин билдириши мүмкүн, башкалары үчүн бирөө гана болот.

Менин оюмча, өндүрүштүн көрүнүшү мындай болмок:

297848936,297338191

168010496

ж.б. ...