Sub BosSec() Range("G:G").SpecialCells _ (xlCellTypeBlanks).Select End Sub Sub Bol() Range("F:F").UnMerge End Sub
G stununda ki boş satırları seçer, F stununda ki birleşmiş hücreleri ayırır
Sub BosSec() Range("G:G").SpecialCells _ (xlCellTypeBlanks).Select End Sub Sub Bol() Range("F:F").UnMerge End Sub
G stununda ki boş satırları seçer, F stununda ki birleşmiş hücreleri ayırır