Msgboxes появляются на листе всякий раз, когда я добавляю некоторые новые подпроцедуры - PullRequest
0 голосов
/ 20 апреля 2020

Я пытаюсь выучить VBA и пишу в интерфейсе VBA некоторые подпрограммы, которые содержат содержание того, что я изучаю. Я не знаю, является ли это эффективным методом для хранения команд и синтаксисов, которые я стоял, чтобы учиться снова позже, из-за этого метода изучения, когда я выполняю / добавляю некоторые новые процедуры, иногда появляются некоторые сообщения на листы с некоторыми случайными числами (КОГДА Я ДОБАВЛЯЛ НОВУЮ ПОДПИСЬ, когда я давал ей команду открыть другую рабочую книгу, в новом wb появляются эти случайные числа ...), я все еще не знаю, если это проблема с памятью VBA или какая-то синтаксическая ошибка, которую я сделал самостоятельно. Пример того, какой код, который я добавляю, попал в такую ​​ошибку, показан ниже:

Sub atribuirobjeto()

    Dim wb As Workbook
    Dim ws As Worksheet
    Dim box As Range 'variável box - para representar o range e localizar ou definir um intervalo de células

    Set wb = Workbooks(1) 'precisa do set quando for atribuir a objeto
    Set ws = Workbooks(1).Worksheets(1)
    'ou
    Set ws = wb.Worksheets(1) 'pode usar o wb para se refenciar ao objeto workbooks

    'de forma similar, ws engloba o wsheet e o workboooks
    Set box = ws.Range("C40")
    ws.Name = "anotacoes_vba"
    box.Value = 14

    Debug.Print TypeName(box)

End Sub

Один из отображаемых msgbox

One msgboxes, который появляется

Полный код по этой ссылке

...