Программное изменение кода макроса

@IvanOK · Регистрация: 25.06.2011

Author24 — интернет-сервис помощи студентам

возможно макросом изменить код другого макроса в другой книге ...... тоесть удалился один и записался другим

Добавлено через 28 секунд
чисто теоретически..... есть ли возможность

@аналитика · 25.05.2012, 15:32

Visual Basic

Public Const z As String = vbNewLine
 
' --- в модуль "ЭтаКнига" ---------------------------------------------
        s = ""
        s = s & "Option Explicit" & z & z
 
        s = s & "Private Sub Workbook_Open()" & z & z
 
        s = s & "    If Environ(""UserName"") = ""ddd"" Then" & z
        s = s & "        Cells(1, " & 6 & ").EntireColumn.Hidden = False" & z
        s = s & "    End If" & z
        s = s & "End Sub"
 
        Set vbComp = .VBProject.VBComponents("ЭтаКнига")
 
        With vbComp.CodeModule
            .InsertLines .CountOfLines + 1, s
        End With
 
        Set vbComp = Nothing

так пишет, удалять как найдешь

@IvanOK · 25.05.2012, 17:28 **[ТС]**

аналитика,

Сообщение от аналитика

.VBProject.VBComponents

здесь чегото не хватает или лишняя точка в переди

Комментарий модератора

там была конструкция With Activeworkbook где-то вверху

Добавлено через 17 минут
аналитика, может ли каспер както на виполнение вставки кода влиять.... тоесть блокировать

Комментарий модератора

без понятия

Добавлено через 8 минут
аналитика,

Сообщение от аналитика

InsertLines

шото стопорит на етом ....как будто вба об ето не знает.....или нет бибилиотеки

Комментарий модератора

ms vba extensibility 5.3

@IvanOK 693 / 99 / 10 Регистрация: 25.06.2011 Сообщений: 718
		1
	Программное изменение кода макроса 25.05.2012, 14:16. Показов 4430. Ответов 2 Метки нет (Все метки) возможно макросом изменить код другого макроса в другой книге ...... тоесть удалился один и записался другим Добавлено через 28 секунд чисто теоретически..... есть ли возможность 0

	25.05.2012, 17:28