Excel VBA для циклической записи формулы в ячейках в зависимости от числа в цикле

Вы должны указать свои ключи массива:

$department = mysql_real_escape_string($_POST['department']);
$name = mysql_real_escape_string($_POST['name']);
$email = mysql_real_escape_string($_POST['email']);
$message = mysql_real_escape_string($_POST['message']);

Как есть, он искал константы, называемые department, name, email, message и т. д. Когда это происходит «Найти такую ​​константу, PHP (странно) интерпретирует ее как строку (« department »и т. д.). Очевидно, что это может легко сломаться, если вы позже определите такую ​​константу (хотя это плохой стиль, чтобы иметь строчные константы).

0
задан Tom 11 March 2019 в 14:17
поделиться

1 ответ

Этого можно добиться без зацикливания

Dim I as Long    
I = 7
With ws.Range("A2:A" & I)
    .Formula = "='" & .Parent.Name & "'!M2"
End With

With - это сокращенный способ использования одного и того же префикса в блоке кода. Компилятор VBA ставит префикс перед всем, что начинается с ., с тем, что объявлено в блоке With

Эквивалентом вышеупомянутого будет:

ws.Range("A2:A" & I).Formula = "='" & ws.Range("A2:A" & I).Parent.Name & "'!M2"
0
ответ дан Tom 11 March 2019 в 14:17
поделиться
Другие вопросы по тегам:

Похожие вопросы: