Замена значений в столбце, а не на всем листе

Всем привет. Имеется код.Код:Sub Pro1Dim oSheetDim oSheetsDim oReplaceoSheet = ThisComponent.CurrentController.getActiv eSheet()GlobalScope.BasicLibraries.LoadL ibrary("Tools")for i = 0 To GetLastUsedRow(oSheet)oReplace = oSheet.getCellByPosition(9,i).createRepl aceDescriptor()oReplace.SearchString = "Да" 'Что меняемoReplace.ReplaceString= "Нет" 'На что заменяемnext ioReplace.SearchWords = FalseEnd Subздесь я пытаюсь заменить В КОЛОНКЕ 9 значение "Да" на "Нет", но только в колонке, а не на всем листе. Что тут я сделал не так?