VBA добавить строки на основе критериев с другого листа

Question

Я новичок в VBA и буду признателен за помощь. В этом случае допустим, что у меня есть 2 worksheets within a workbook. Первый помечен как monkeys, а второй - cows.

В cows У меня есть номер в cell P1. Если он больше 0, я хочу добавить строки в monkeys на основе этого числа. В частности, добавьте пустые строки из строки 5 в monkeys.

Если ячейка P1 в cows равна 0, то ничего не делать.

Пожалуйста, дайте мне знать, если есть вопросы. Оцените любой ввод.

Спасибо!

Answer 1

объектная модель для листов показывает, как вы можете проверить какой лист вы после: https://msdn.microsoft.com/en-us/library/office/ff193217.aspx?f=255&MSPPError=-2147217396

if Sheets("Cows").Cells(1,16).Value > 0 then 
    Sheets("Monkeys").Cells/Row/etc...... = Sheets("Cows").Cells/Row/etc....... 
End if 

Вы, возможно, потребуется также проверить, если значение является числовым: IsNumeric (х) проверяет, является ли значение является числовым или нет.