У меня есть вопросы, чтобы добавить новую строку, но мне нужен способ редактировать существующие строки, задавая пользователю, в какое время (керта) и заполняя те же вопросы, заменяя старую информацию
Dim Päivä As String
Dim Kerta As String
Dim lastrow1 As Long
Dim lastrow4 As Long
Päivä = InputBox("Mikä päivä?", "PÄIVÄKIRJA")
lastrow1 = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row + 1
ActiveSheet.Cells(lastrow1, "B").Value = Päivä
Kerta = InputBox("Monesko harjoituskerta", "PÄIVÄKIRJA")
lastrow4 = ActiveSheet.Cells(Rows.Count, "F").End(xlUp).Row
ActiveSheet.Cells(lastrow4, "F").Value = Kerta
У меня есть вопрос, который спрашивает номер сеанса, и мне нужно распознать строку на основе значения этой ячейки, и заменить строку с вопросами.(päivä = день / керта = сессия)