Excel Forum

ใช่เลยค่ะ ขอบคุณมากนะคะที่เสนอแนวทาง ไม่รู้มาก่อนเลยว่ามันกรองแบบนี้ได้ด้วย แบบว่าไม่ค่อยได้ใช้บ่อยค่ะ ขอบคุณมากเลยค่ะ

Sub Delete_Every_Other_Row()

' Dimension variables.
Y = False ' Change this to True if you want to
' delete rows 1, 3, 5, and so on.
I = 1
Set xRng = Selection

' Loop once for every row in the selection.
For xCounter = 1 To xRng.Rows.Count

' If Y is True, then...
If Y = True Then ...

ค่าgps.xlsx สวัสดีค่ะ รบกวนถามหน่อยค่ะ ว่าถ้าหนูจะลบข้อมูลทั้งหมด ให้เหลือแต่ค่าที่หนูต้องการคือค่า ที่มีชื่อในคอลัมน์ 1 ว่า $GPGGA ให้เหลือแต่คอลัมน์ J กับค่าที่มีชื่อคอลัมป์ 1 ว่า $GPRMC ให้เหลือแต่คอลัมป์ H เพราะหนูต้องการแค่สองค่านี้มาคำนวณต่ออ่าค่ะ ควรทำอย่างไรดีคะ ถ้าให้สองค่านี้อยู่คอลัมน์ก ...