If Range(Cells(CurrentRow, i), Cells(CurrentRow, i)).Value = "q" Then If Range(Cells(CurrentRow, i), Cells(CurrentRow, i)).Value = "a" Then Selection.SpecialCells(xlBlanks).Delete shift:=xlToLeft Below is the vba code I have: Option VBASupport The only problem I am facing is that libreoffice, the default spreadsheet package is not compatible with excel macros. I have recently migrated to pclinuxos from windows and seem to like it.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |