Ошибка 438 vba access

Permalink

Cannot retrieve contributors at this time

title	keywords	f1_keywords	ms.prod	ms.assetid	ms.date	ms.localizationpriority
Object doesn’t support this property or method (Error 438)	vblr6.chm1011328	vblr6.chm1011328	office	0fbab746-dc6d-b227-429a-1f56bb4ca448	06/08/2017	medium

Not all objects support all properties and methods. This error has the following cause and solution:

You specified a method or property that doesn’t exist for this Automation object.

See the object’s documentation for more information on the object and check the spellings of properties and methods.
You specified a Friend procedure to be called late bound. The name of a Friend procedure must be known at compile time. It can’t appear in a late-bound call.

For additional information, select the item in question and press F1 (in Windows) or HELP (on the Macintosh).

[!includeSupport and feedback]

Источник

David Zemens got your answer.

Here’s how to avoid repeating it.

Looking at this line:

For Each item In Worksheets("Collector").SlicerCaches("Slicer_RptDate").SlicerItems

If we made every statement explicit, it would look like this:

For Each item In Worksheets.Item("Collector").SlicerCaches.Item("Slicer_RptDate").SlicerItems

In other words:

Worksheets.Item("Collector") _
          .SlicerCaches.Item("Slicer_RptDate") _
                       .SlicerItems

That’s a lot of member accesses for a single instruction.

By introducing intermediate variables…

Dim collectorSheet As Worksheet
Set collectorSheet = Worksheets("Collector")

Dim rptDateSlicerCache As SlicerCache
Set rptDateSlicerCache = collectorSheet.SlicerCaches("Slicer_RptDate") '*

For Each item In rptDateSlicerCache.SlicerItems
    '...
Next

…you could have noticed while typing the line marked with a '* comment, that IntelliSense doesn’t offer SlicerCaches as a member of collectorSheet.

Why? Because this:

Worksheets("Collector")

Returns an Object — and from that point on, you’re on your own: IntelliSense can’t help you with autocompletion, because members of an Object aren’t resolved until runtime.

By assigning that object to a Worksheet variable, you give yourself compile-time checking, and avoid that pesky runtime error 438.

Источник

Return to VBA Code Examples

This article will demonstrate how to Fix VBA Error 438 – Object Doesn’t Support Property or Method.

Error 438 is a frequently occuring error in Excel VBA and is caused by either omitting a property or method when referring to an object, or by using a property or method that is not available to an object in the VBA code.

Check the VBA code to Fix Error 438

Let us examine the following code:

Sub RemoveWorksheet()
  Dim wb As Workbook
  Dim ws As Worksheet
  Dim sheetName As String
  sheetName = "Sheet 1"
  Set wb = ActiveWorkbook
  For Each ws In wb.Sheets
     If ws = sheetName Then
        wb.Sheets(sheetName).Delete
        Exit For
     End If
  Next ws
End Sub

If we run this code, Error 438 will occur.

VBAError438 errormsg

To resolve this issue, we click on Debug to see where the error is occurring.

VBAError438 debug

This line of code is trying to equate the worksheet (depicted by the variable ws) to the sheet name. This is not possible as the worksheet is an object but the sheet name is a string so Error 438 is therefore returned.

To solve this, compare the string sheetName to the name property of the worksheet object:

ws.name = sheetName

Now the code runs without issue!

To show a list of all the properties or methods that are available to the worksheet object, we can type a dot (.) after the object.

VBAError438 properties

This invokes the VBA Editor’s Intellisense feature. To make sure it’s turned on, in the Menu, select Tools > Options.

VBAError438 auto list members

Make sure Auto List Members is checked and then click OK.

NOTE: This is usually on by default.

You can also find a list of all the Properties, Methods and Events for an Excel Object in the Object Browser.

In the Menu, select View > Object Browser or press F2 (See more VBE shortcuts).

A list of classes and objects will appear in the left hand side of the screen. If you click on the object you wish to use (eg: Workbook), a list of all the Properties, Methods and Events that that object supports will appear in the right hand side of the screen. (eg: Members of Workbook).

VBAError438 object browser

VBA Coding Made Easy

Stop searching for VBA code online. Learn more about AutoMacro — A VBA Code Builder that allows beginners to code procedures from scratch with minimal coding knowledge and with many time-saving features for all users!
vba save as

Learn More!

Источник

Home / VBA / VBA Object Doesn’t Support this Property or Method Error (Error 438)

VBA error 438 occurs when you try to use a property or method that does not support by that object. as you know all objects have some properties and methods that you can use but there could be a situation when using a property or method that does not apply to a particular object.

Let’s take an example to understand this: with the worksheet object there comes up a method to select the worksheet.

Now as you know you can activate a workbook but there is no method that you can use to select a workbook because you cannot select a workbook, you can only activate it.

So when you try to use this method with the workbook object you’ll get the runtime error 438. Even you can see this method is not in the list of properties and methods of the workbook object.

Now you can understand that it can be a mistake on the end of the person who writes the code and can be committed even if you are proficient in VBA.

Note: When you have written a code in the latest version of Microsoft Excel and now you try to run it in an older version, there’s could be a chance that that version doesn’t have a method or a property for the object you are using.

The best way to deal with this error 438 (Object Doesn’t Support this Property or Method) you need to be aware of the properties and methods that are supported by the object you are using.

When you define an object, you can see the list of all the properties and methods when you type a dot (.).

This list can help you to decide if the method you want to use is there or not. And if it’s not there you need to find a different way to write a code for the task that you want to accomplish. Otherwise, you can also open the object browser (F2) to see the properties and methods you have with an object.

More on VBA Errors

Источник

We already know that this is the most frustrating Microsoft Visual Basic Runtime Error 438 VBA issue which you are getting in day-to-day life, So today we are surely here going to show you some top best accessible methods and solutions and some tips and tricks to get rid out of it permanently from your Windows PC as well on your device too if you are facing on it also.

This shows an error code message like,

Run time Error 438

When you are running a Visual Basic or running the Microsoft Excel 2000, then you might get this error problem. This error occurs when you are trying to use variables for workbooks & worksheet names. This Microsoft Visual Basic Runtime Error 438 VBA may also happen when you are running a program in which a form is assigned to a variable & that variable is used to access a control on the form. This error includes your PC system crashes, virus infection or sometimes freezes too. It also starts when you are trying to execute the BW query. This error may occur if the installed AMD drivers out of date.

Causes of Microsoft Visual Basic Runtime Error 438 VBA Issue:

Microsoft Visual Basic runtime
Windows PC error issue
An object does not support this property or method epaceengagement

So, here are some quick tips and tricks for efficiently fixing and resolve this type of Microsoft Visual Basic Runtime Error 438 VBA Windows PC Code issue from you permanently.

How to Fix & Solve Microsoft Visual Basic Runtime Error 438 VBA Issue

1. Disable the Enhanced Protected Mode from Internet Explorer –

Disable the Enhanced Protected Mode from Internet Explorer

Open Internet Explorer
Click on the tools option there, on the right side
Click on the Internet Options there
On the Advanced option,
Uncheck the option box for “Enable Enhanced Protected Mode.”
It’s under the Security tab
Now, click on Apply to apply these settings
Click on OK to save this configuration
After completing, close all the tabs there
That’s it, done

By disabling the Enhanced Protected Mode from your Internet Explorer browser can get rid out of this Microsoft Visual Basic Runtime Error 438 vba excel code problem.

2. Install an Automatic Repair Tool on your Windows PC –

Install an Automatic Repair Tool

Go & Search for Automatic Repair Tool on the Internet
Download it from there
Now, Click on ‘RUN‘ & Install it
Open it and use the automatic repair tool
After finish, close the tab
That’s it, done

By installing an automated repair tool on your Windows PC will fix this Runtime Error 438 excel vba access problem quickly from you.

3. Uninstall Microsoft Works Add-in on your Windows PC –

Uninstall Microsoft Works Add-in

Click on the Start menu
Search for Control Panel or directly open it
Open ‘Add or Remove Programs‘ tab there
Click on the file location in the options tab
On the Uninstall/Install option,
Select the Words in Works Suite Add-in
Again, click on the Add or Remove Programs there
Follow the ON Screen instructions
After completing, close all the tabs from there
Restart your PC
Load the Microsoft Word again
That’s it, done

By uninstalling the Microsoft Works Add-in can get back you from this type of excel Runtime Error 438 VBA code issue.

4. Use a Registry Cleaner to Clean the Registry of your Windows –

Clean or Restore the Registry

Clean your registry by any registry cleaner software so that it can fix and solve this VBA Runtime Error 438 object doesn’t support access problem from your PC completely.

5. Reinstall the Drivers for the Device on your PC –

Reinstall the drivers for the device

By Reinstalling the drivers for the device will fix your Visual Basic outlook Runtime Error 438 fix problem.

6. Run a Full Scan of your Windows PC for Malware or Virus –

Scan your PC for Virus/Malware Microsoft Visual Basic Runtime Error 438 VBA

Go to the start menu
Search or go to the “Microsoft Security Essentials” there
Click on it and opens it there
A Pop-up will open there
Check the ‘Full‘ option there to scan thoroughly
After, click on the ‘Scan Now‘ option to scan carefully
After scanning, close the tab
That’s it, done

By running a full scan of your PC can get rid out of this Runtime Error 438 word Excel VBA problems from your PC completely.

7. Create a System Restore Point on your Windows PC –

Fix System Restore Features Microsoft Visual Basic Runtime Error 438 VBA

Go to the start menu
Search or go to the ‘System Restore.’
Clicks on it and open it there
After that, tick on the “Recommended settings” or ‘Select a restore point‘ there
After selecting, click on the Next option there
Now, follow the wizard
After completing, close the tab
That’s it, done

So by applying this method on your Microsoft Windows PC can quickly solve this VBA Runtime Error 438 excel MAC issue.

“ OR “

Run System Restore & Create a Restore Point Microsoft Visual Basic Runtime Error 438 VBA

Go to the start menu
Search or go to the ‘System Properties.’
Click on it and opens it
After that, go to the “System Protection” option there
Now, click on the “System Restore” option there
& Create a Restore point there
After completing, close the tab
That’s it, done

Run a system restore and creating a new restore point by any of these two methods can solve this Visual Basic Runtime Error 438 ecw excel mac problem from your PC completely.

8. Troubleshoot & Run an Automatic Windows Repair on your PC –

Repair your PC (Computer) Microsoft Visual Basic Runtime Error 438 VBA

Go to the start menu
Search or go to the PC settings there
Click on the ‘Troubleshoot‘ option there
After opening, click on the ‘Advanced options‘ there
Then, click on the “Automatic Repair” option there
After troubleshooting, close the tab
That’s it, done

By running an automatic repair of your PC can get rid out of this Microsoft Visual Basic excel vba Runtime Error 438 problem from your PC.

9. Disable or Uninstall your Windows Antivirus Software on your PC –

Disable or Reinstall Antivirus Software Microsoft Visual Basic Runtime Error 438 VBA

By Disabling or uninstalling your antivirus software can quickly fix and solve this Runtime Error 438 object doesn’t support this property or method epaceengagement problem.

10. Restart your Windows PC [OPTIONAL] –

Restart your Computer Microsoft Visual Basic Runtime Error 438 VBA

Go to the Start menu
Click on the right side of ‘Shutdown.’
Click on Restart option there to restart
That’s it, done

If this is your first time you have seen this stop error screen then by restarting your PC again will quickly fix this Microsoft Visual Basic Runtime Error 438 VBA problem.

These are the quick and the best way methods to get quickly rid out of this Microsoft Visual Basic Runtime Error 438 VBA Windows PC Code problem from you entirely. Hope these solutions will surely help you to get back from this Microsoft Visual Basic Runtime Error 438 VBA issue.

If you are facing or falling in this Microsoft Visual Basic Runtime Error 438 VBA Windows PC Code problem or any error problem, then comment down the error problem below so that we can fix and solve it too by our top best quick methods guides.

Источник

В этой статье представлена ошибка с номером Ошибка 438, известная как Ошибка выполнения 438 — объект не поддерживает это свойство или метод, описанная как Ошибка выполнения 438 — объект не поддерживает это свойство или метод. Наиболее частой причиной ошибки 438 является несоблюдение бинарной совместимости между последовательными версиями ваших компонентов. Каждый COM-интерфейс имеет связанный GUID, который называется inte

О программе Runtime Ошибка 438

Время выполнения Ошибка 438 происходит, когда ActiveX дает сбой или падает во время запуска, отсюда и название. Это не обязательно означает, что код был каким-то образом поврежден, просто он не сработал во время выполнения. Такая ошибка появляется на экране в виде раздражающего уведомления, если ее не устранить. Вот симптомы, причины и способы устранения проблемы.

Определения (Бета)

Здесь мы приводим некоторые определения слов, содержащихся в вашей ошибке, в попытке помочь вам понять вашу проблему. Эта работа продолжается, поэтому иногда мы можем неправильно определить слово, так что не стесняйтесь пропустить этот раздел!

Двоичный — двоичный, система счисления с основанием 2, представляет числа с помощью двух символов: 0 и 1.
Двоичная совместимость — Двоичная совместимость — это, как правило, способность двух программно-аппаратных систем запускать один и тот же двоичный код без необходимости перекомпиляции.
Совместимость . Этот тег следует использовать для определения вопросов, касающихся проблем совместимости, например, между разными версиями одного и того же программного продукта, комплекта средств разработки или библиотеки.
Компоненты — компонент в унифицированном языке моделирования «представляет собой модульную часть системы, которая инкапсулирует его содержимое и чье воплощение можно заменить в его среде.
Guid — Глобально уникальный идентификатор GUID — это уникальный ссылочный номер, используемый в качестве идентификатора в компьютерном программном обеспечении.

< li> Интерфейс — интерфейс относится к точке взаимодействия между компонентами.

Объект — объект — это любой объект, которым можно управлять с помощью команд на языке программирования.
Время выполнения — время выполнения — это время, в течение которого программа работает, выполняя
ошибка выполнения — среда выполнения ошибка обнаруживается после или во время выполнения программы.
Свойство . В некоторых объектно-ориентированных языках программирования свойство представляет собой особый вид члена класса, промежуточный между поле или член данных и метод.
Метод . Метод, часто называемый функцией, подпрограммой или процедурой, — это код, который выполняет задачу и связан с классом или объектом.

Симптомы Ошибка 438 — Ошибка выполнения 438 — объект не поддерживает это свойство или метод

Ошибки времени выполнения происходят без предупреждения. Сообщение об ошибке может появиться на экране при любом запуске %программы%. Фактически, сообщение об ошибке или другое диалоговое окно может появляться снова и снова, если не принять меры на ранней стадии.

Возможны случаи удаления файлов или появления новых файлов. Хотя этот симптом в основном связан с заражением вирусом, его можно отнести к симптомам ошибки времени выполнения, поскольку заражение вирусом является одной из причин ошибки времени выполнения. Пользователь также может столкнуться с внезапным падением скорости интернет-соединения, но, опять же, это не всегда так.

Fix Ошибка выполнения 438 - объект не поддерживает это свойство или метод (Error Ошибка 438)
(Только для примера)

Причины Ошибка выполнения 438 — объект не поддерживает это свойство или метод — Ошибка 438

При разработке программного обеспечения программисты составляют код, предвидя возникновение ошибок. Однако идеальных проектов не бывает, поскольку ошибки можно ожидать даже при самом лучшем дизайне программы. Глюки могут произойти во время выполнения программы, если определенная ошибка не была обнаружена и устранена во время проектирования и тестирования.

Ошибки во время выполнения обычно вызваны несовместимостью программ, запущенных в одно и то же время. Они также могут возникать из-за проблем с памятью, плохого графического драйвера или заражения вирусом. Каким бы ни был случай, проблему необходимо решить немедленно, чтобы избежать дальнейших проблем. Ниже приведены способы устранения ошибки.

Методы исправления

Ошибки времени выполнения могут быть раздражающими и постоянными, но это не совсем безнадежно, существует возможность ремонта. Вот способы сделать это.

Если метод ремонта вам подошел, пожалуйста, нажмите кнопку upvote слева от ответа, это позволит другим пользователям узнать, какой метод ремонта на данный момент работает лучше всего.

Обратите внимание: ни ErrorVault.com, ни его авторы не несут ответственности за результаты действий, предпринятых при использовании любого из методов ремонта, перечисленных на этой странице — вы выполняете эти шаги на свой страх и риск.

Метод 1 — Закройте конфликтующие программы

Когда вы получаете ошибку во время выполнения, имейте в виду, что это происходит из-за программ, которые конфликтуют друг с другом. Первое, что вы можете сделать, чтобы решить проблему, — это остановить эти конфликтующие программы.

Откройте диспетчер задач, одновременно нажав Ctrl-Alt-Del. Это позволит вам увидеть список запущенных в данный момент программ.
Перейдите на вкладку «Процессы» и остановите программы одну за другой, выделив каждую программу и нажав кнопку «Завершить процесс».
Вам нужно будет следить за тем, будет ли сообщение об ошибке появляться каждый раз при остановке процесса.
Как только вы определите, какая программа вызывает ошибку, вы можете перейти к следующему этапу устранения неполадок, переустановив приложение.

Метод 2 — Обновите / переустановите конфликтующие программы

Использование панели управления

В Windows 7 нажмите кнопку «Пуск», затем нажмите «Панель управления», затем «Удалить программу».
В Windows 8 нажмите кнопку «Пуск», затем прокрутите вниз и нажмите «Дополнительные настройки», затем нажмите «Панель управления»> «Удалить программу».
Для Windows 10 просто введите «Панель управления» в поле поиска и щелкните результат, затем нажмите «Удалить программу».
В разделе «Программы и компоненты» щелкните проблемную программу и нажмите «Обновить» или «Удалить».
Если вы выбрали обновление, вам просто нужно будет следовать подсказке, чтобы завершить процесс, однако, если вы выбрали «Удалить», вы будете следовать подсказке, чтобы удалить, а затем повторно загрузить или использовать установочный диск приложения для переустановки. программа.

Использование других методов

В Windows 7 список всех установленных программ можно найти, нажав кнопку «Пуск» и наведя указатель мыши на список, отображаемый на вкладке. Вы можете увидеть в этом списке утилиту для удаления программы. Вы можете продолжить и удалить с помощью утилит, доступных на этой вкладке.
В Windows 10 вы можете нажать «Пуск», затем «Настройка», а затем — «Приложения».
Прокрутите вниз, чтобы увидеть список приложений и функций, установленных на вашем компьютере.
Щелкните программу, которая вызывает ошибку времени выполнения, затем вы можете удалить ее или щелкнуть Дополнительные параметры, чтобы сбросить приложение.

Метод 3 — Обновите программу защиты от вирусов или загрузите и установите последнюю версию Центра обновления Windows.

Заражение вирусом, вызывающее ошибку выполнения на вашем компьютере, необходимо немедленно предотвратить, поместить в карантин или удалить. Убедитесь, что вы обновили свою антивирусную программу и выполнили тщательное сканирование компьютера или запустите Центр обновления Windows, чтобы получить последние определения вирусов и исправить их.

Метод 4 — Переустановите библиотеки времени выполнения

Вы можете получить сообщение об ошибке из-за обновления, такого как пакет MS Visual C ++, который может быть установлен неправильно или полностью. Что вы можете сделать, так это удалить текущий пакет и установить новую копию.

Удалите пакет, выбрав «Программы и компоненты», найдите и выделите распространяемый пакет Microsoft Visual C ++.
Нажмите «Удалить» в верхней части списка и, когда это будет сделано, перезагрузите компьютер.
Загрузите последний распространяемый пакет от Microsoft и установите его.

Метод 5 — Запустить очистку диска

Вы также можете столкнуться с ошибкой выполнения из-за очень нехватки свободного места на вашем компьютере.

Вам следует подумать о резервном копировании файлов и освобождении места на жестком диске.
Вы также можете очистить кеш и перезагрузить компьютер.
Вы также можете запустить очистку диска, открыть окно проводника и щелкнуть правой кнопкой мыши по основному каталогу (обычно это C 🙂
Щелкните «Свойства», а затем — «Очистка диска».

Метод 6 — Переустановите графический драйвер

Если ошибка связана с плохим графическим драйвером, вы можете сделать следующее:

Откройте диспетчер устройств и найдите драйвер видеокарты.
Щелкните правой кнопкой мыши драйвер видеокарты, затем нажмите «Удалить», затем перезагрузите компьютер.

Метод 7 — Ошибка выполнения, связанная с IE

Если полученная ошибка связана с Internet Explorer, вы можете сделать следующее:

Сбросьте настройки браузера.

В Windows 7 вы можете нажать «Пуск», перейти в «Панель управления» и нажать «Свойства обозревателя» слева. Затем вы можете перейти на вкладку «Дополнительно» и нажать кнопку «Сброс».
Для Windows 8 и 10 вы можете нажать «Поиск» и ввести «Свойства обозревателя», затем перейти на вкладку «Дополнительно» и нажать «Сброс».

Отключить отладку скриптов и уведомления об ошибках.

В том же окне «Свойства обозревателя» можно перейти на вкладку «Дополнительно» и найти пункт «Отключить отладку сценария».
Установите флажок в переключателе.
Одновременно снимите флажок «Отображать уведомление о каждой ошибке сценария», затем нажмите «Применить» и «ОК», затем перезагрузите компьютер.

Если эти быстрые исправления не работают, вы всегда можете сделать резервную копию файлов и запустить восстановление на вашем компьютере. Однако вы можете сделать это позже, когда перечисленные здесь решения не сработают.

Другие языки:

How to fix Error 438 (Runtime Error 438 — Object Doesn’t Support this Property or Method) — Runtime Error 438 — Object Doesn’t Support this Property or Method. The most common cause of error 438 is not maintaining binary compatibility between successive versions of your components. Each COM interface has an associated GUID that is called an inte
Wie beheben Fehler 438 (Laufzeitfehler 438 — Objekt unterstützt diese Eigenschaft oder Methode nicht) — Laufzeitfehler 438 — Objekt unterstützt diese Eigenschaft oder Methode nicht. Die häufigste Ursache für Fehler 438 besteht darin, dass die Binärkompatibilität zwischen aufeinanderfolgenden Versionen Ihrer Komponenten nicht aufrechterhalten wird. Jede COM-Schnittstelle hat eine zugehörige GUID, die als inte bezeichnet wird
Come fissare Errore 438 (Errore di runtime 438 — L’oggetto non supporta questa proprietà o metodo) — Errore di runtime 438 — L’oggetto non supporta questa proprietà o metodo. La causa più comune dell’errore 438 è il mancato mantenimento della compatibilità binaria tra le versioni successive dei componenti. Ogni interfaccia COM ha un GUID associato che è chiamato un inte
Hoe maak je Fout 438 (Runtime-fout 438 — Object ondersteunt deze eigenschap of methode niet) — Runtime-fout 438 — Object ondersteunt deze eigenschap of methode niet. De meest voorkomende oorzaak van fout 438 is het niet handhaven van binaire compatibiliteit tussen opeenvolgende versies van uw componenten. Elke COM-interface heeft een bijbehorende GUID die een inte
Comment réparer Erreur 438 (Erreur d’exécution 438 — L’objet ne prend pas en charge cette propriété ou cette méthode) — Erreur d’exécution 438 — L’objet ne prend pas en charge cette propriété ou cette méthode. La cause la plus courante de l’erreur 438 n’est pas le maintien de la compatibilité binaire entre les versions successives de vos composants. Chaque interface COM a un GUID associé qui s’appelle un inte
어떻게 고치는 지 오류 438 (런타임 오류 438 — 개체가 이 속성 또는 메서드를 지원하지 않습니다.) — 런타임 오류 438 — 개체가 이 속성 또는 메서드를 지원하지 않습니다. 오류 438의 가장 일반적인 원인은 구성 요소의 연속 버전 간에 바이너리 호환성을 유지하지 않기 때문입니다. 각 COM 인터페이스에는 inte라고 하는 관련 GUID가 있습니다.
Como corrigir o Erro 438 (Erro de tempo de execução 438 — O objeto não suporta esta propriedade ou método) — Erro de tempo de execução 438 — O objeto não oferece suporte a esta propriedade ou método. A causa mais comum do erro 438 é não manter a compatibilidade binária entre versões sucessivas de seus componentes. Cada interface COM tem um GUID associado, denominado inte
Hur man åtgärdar Fel 438 (Runtime Error 438 — Objekt stöder inte denna egenskap eller metod) — Runtime Error 438 — Objektet stöder inte den här egenskapen eller metoden. Den vanligaste orsaken till fel 438 är att inte bibehålla binär kompatibilitet mellan på varandra följande versioner av dina komponenter. Varje COM -gränssnitt har ett associerat GUID som kallas ett inte
Jak naprawić Błąd 438 (Błąd wykonania 438 — obiekt nie obsługuje tej właściwości lub metody) — Błąd wykonania 438 — obiekt nie obsługuje tej właściwości lub metody. Najczęstszą przyczyną błędu 438 jest brak zgodności binarnej między kolejnymi wersjami komponentów. Każdy interfejs COM ma przypisany identyfikator GUID, który nazywa się inte
Cómo arreglar Error 438 (Error de tiempo de ejecución 438: el objeto no admite esta propiedad o método) — Error de tiempo de ejecución 438: el objeto no admite esta propiedad o método. La causa más común del error 438 es no mantener la compatibilidad binaria entre versiones sucesivas de sus componentes. Cada interfaz COM tiene un GUID asociado que se denomina inte

Об авторе: Фил Харт является участником сообщества Microsoft с 2010 года. С текущим количеством баллов более 100 000 он внес более 3000 ответов на форумах Microsoft Support и создал почти 200 новых справочных статей в Technet Wiki.

Следуйте за нами:

Последнее обновление:

29/05/22 03:40 : Пользователь Windows 10 проголосовал за то, что метод восстановления 1 работает для него.

Рекомендуемый инструмент для ремонта:

Этот инструмент восстановления может устранить такие распространенные проблемы компьютера, как синие экраны, сбои и замораживание, отсутствующие DLL-файлы, а также устранить повреждения от вредоносных программ/вирусов и многое другое путем замены поврежденных и отсутствующих системных файлов.

ШАГ 1:

Нажмите здесь, чтобы скачать и установите средство восстановления Windows.

ШАГ 2:

Нажмите на Start Scan и позвольте ему проанализировать ваше устройство.

ШАГ 3:

Нажмите на Repair All, чтобы устранить все обнаруженные проблемы.

СКАЧАТЬ СЕЙЧАС

Совместимость

Требования

1 Ghz CPU, 512 MB RAM, 40 GB HDD
Эта загрузка предлагает неограниченное бесплатное сканирование ПК с Windows. Полное восстановление системы начинается от $19,95.

ID статьи: ACX010304RU

Применяется к: Windows 10, Windows 8.1, Windows 7, Windows Vista, Windows XP, Windows 2000

Источник

Remove From My Forums

Question
Good day

i seem to get a run-time error 438: Object doesn’t support this property or Method every time i try running my macro to automatically attach a PDF file called «Statement.xlsm»

Please assist, i am new at this VBA

here is my code:

Dim objOutlook As Object
Dim objNameSpace As Object
Dim objInbox As Object
Dim objMailItem As Object
Set objOutlook = CreateObject(«Outlook.Application»)
Set objNameSpace = objOutlook.GetNamespace(«MAPI»)
Set objInbox = objNameSpace.Folders(1)
Set objMailItem = objOutlook.CreateItem(0)
‘Declare a String variable for the recipient list, and an Integer variable
‘for the count of cells in column A that contain email addresses.
Dim strTo As String
Dim i As Integer
strTo = «»
i = 1

‘Loop through the recipient email addresses to build a continuous string that separates recipient addresses by a semicolon and a space.
With Worksheets(«Statement») ‘change sheet name where list is kept.
Do
strTo = strTo & .Cells(i, 25).Value & «; «
i = i + 1
Loop Until IsEmpty(.Cells(i, 25))
End With
‘Remove the last two characters from the recipient string, which are
‘an unnedded semicolon and space.
strTo = Mid(strTo, 1, Len(strTo) — 2)
‘Display the email message with the attached active workbook.
With objMailItem
.To = strTo
.CC = «Eutychus@gcis.gov.za»
.Subject = «Media buying Statement»
.Body = _
«Hello everyone,» & Chr(10) & Chr(10) & _
«Here’s an example for attaching the active workbook» & Chr(10) & _
«to an email with multiple recipients.»

Dim Attachment1 As String

Attachment1 = «http://ecms.gcis.gov.za/sites/docs/fin_mngmnt/47 Systems/4-7-3 Media Buying System/4-7-3-1 Media Buying Statements/Statement.xlsm.pdf»

.addAttachments
Attachment1 ‘(this is were is says i must
debug)

.Display ‘Change to Send if you want to just send it.

End With
‘Release object variables from system memory.
Set objOutlook = Nothing
Set objNameSpace = Nothing
Set objInbox = Nothing
Set objMailItem = Nothing

Thank you in advance

Answers

The correct would be:
```
  .Attachments.Add Attachment1
```
However, I couldn’t get the file in the URL indicated by Attachment1, because the URL http://ecms.gcis.gov.za/sites/docs/fin_mngmnt/47 Systems/4-7-3 Media Buying System/4-7-3-1 Media Buying Statements/Statement.xlsm.pdf doesn’t exist. Are you sure it is
correct?

Felipe Costa Gualberto — http://www.ambienteoffice.com.br
- Proposed as answer by
  
  Thursday, January 22, 2015 3:34 AM
- Marked as answer by
  Fei XueMicrosoft employee
  Thursday, January 29, 2015 10:47 AM

Источник

Andrushka252

0 / 0 / 0

Регистрация: 26.10.2019

Сообщений: 8

Excel

26.10.2019, 16:52. Показов 9843. Ответов 13

Метки нет (Все метки)

Добрый день,написал макрос для копирования информации с одного листа на другой,но он не работает (
Помогите пожалуйста,я в этом деле чайник

Вот сам макрос:

Visual Basic

Sub копи()
 
AllRecs = Application.WorksheetFunction.CountA(Sheets("табл2").Range("B:B"))
cAllRecs = Application.WorksheetFunction.CountA(Sheets("лист3").Range("B:B"))
    For CurRec = Лист3 To AllRecs
    AllCrit = Sheets("табл2").Cells(CurRec, 2)
        For cRecs = Лист3 To cAllRecs
           CheckKrit = Sheets("табл3").Cells(cRecs, 9)
    If AllCrit = CheckKrit Then
      Sheets("лист3").Cells(cRecs, 6) = Sheets("табл2").Cells(CurRec, 1)
      Sheets("лист3").Cells(cRecs, 7) = Sheets("табл2").Cells(CurRec, 3)
    End If
   Next cRecs
 Next CurRec
End Sub

Миниатюры

Не работает макрос(ошибка 438)

__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь

6874 / 2806 / 533

Регистрация: 19.10.2012

Сообщений: 8,550

26.10.2019, 17:09

Копать отсюда и до обеда?
С какого в коде присутствует Лист3?

0 / 0 / 0

Регистрация: 26.10.2019

Сообщений: 8

26.10.2019, 17:19

[ТС]

Это название страницы

Добавлено через 1 минуту
Hugo121,могу поменять,это важно?

Hugo121

6874 / 2806 / 533

Регистрация: 19.10.2012

Сообщений: 8,550

26.10.2019, 17:22

Поясните — что хотели сказать тут:

Visual Basic

1	For cRecs = Лист3 To cAllRecs

P.S. Вообще это не название страницы. Это теоретически могла бы быть переменная, содержащая название страницы — но это не тот случай…

6874 / 2806 / 533

Регистрация: 19.10.2012

Сообщений: 8,550

26.10.2019, 17:27

Данных вообще сколько строк? Потому что если их много — это всё желательно делать иначе (это я не про ошибку про ошибку, которая правда пока и не особо понятно на какой строке ).

Добавлено через 1 минуту

Цитата
Сообщение от Andrushka252
Посмотреть сообщение

могу поменять,это важно?

— да не, пишите код как хотите

0 / 0 / 0

Регистрация: 26.10.2019

Сообщений: 8

26.10.2019, 17:28

[ТС]

3 столбца и там и там,а строк может быть сколько угодно,но да их много

6874 / 2806 / 533

Регистрация: 19.10.2012

Сообщений: 8,550

26.10.2019, 17:32

Цитата
Сообщение от Andrushka252
Посмотреть сообщение

я брал за образец макрос из этого форума

— и откуда тогда взялось в коде Лист3 в том месте?

Не по теме:

Я пока пас, ушёл…

0 / 0 / 0

Регистрация: 26.10.2019

Сообщений: 8

26.10.2019, 17:35

[ТС]

Ну если в том случае переносится информация с листа 1 на 2,то в моём с Табл2 на лист3.
Как по мне,всё логично,но я повторюсь,что я чайник.

208 / 183 / 43

Регистрация: 02.08.2019

Сообщений: 584

Записей в блоге: 23

26.10.2019, 17:50

Andrushka252, Привет! выложи файл, и опиши что хочешь сделать?

0 / 0 / 0

Регистрация: 26.10.2019

Сообщений: 8

26.10.2019, 18:57

[ТС]

я хочу совместить эти листы по номеру азс,номеров азс может быть до тысячей,и для ускорения работы мне нужен макрос

0 / 0 / 0

Регистрация: 26.10.2019

Сообщений: 8

26.10.2019, 19:01

[ТС]

art1289, Вот листы

6874 / 2806 / 533

Регистрация: 19.10.2012

Сообщений: 8,550

26.10.2019, 21:39

Цитата
Сообщение от Andrushka252
Посмотреть сообщение

Вот листы

— я вернулся. А файла так всё ещё и нет… Есть мутные картинки, с которых кто-то должен перерисовать инфу в файл.
Вообще вроде как должно хватить записи в макрос применения ВПР() (не вникал, ибо описание ТЗ нет), но если и впрямь тысячи — то лучше конечно макрос на словаре.

viktor424

0 / 0 / 0

Регистрация: 31.10.2019

Сообщений: 1

31.10.2019, 20:03

Visual Basic

' Кто автор не помню но макрос работает 
 
Option Explicit
Option Base 1
 
Sub СамиМыНеМестные() ' в смысле - сбор данных с нескольких листов '
    Const ColName As String = "A"
    Const FirstRow As Long = 1
    Const M As Long = 2 ' Columns.Count '
    '
    Dim Sh As Worksheet, Rng As Range
    Dim Arr1, TranspArr(), TotalArr()
    Dim LastRow As Long
    Dim N As Long, N1 As Long
    Dim I As Long, J As Long, K As Long
    Dim A As String
    '
    Application.ScreenUpdating = False
    For Each Sh In ThisWorkbook.Worksheets
        GoSub RoutineGetRng
        A = Rng.Address(0, 0)
        If Sh.Name = "Сборка" Then
            Rng.ClearContents
        Else
            Arr1 = Rng.Value
            N = N + N1
            ReDim Preserve TranspArr(M, N)
            For I = 1 To N1
                K = N - N1 + I
                For J = 1 To M
                    TranspArr(J, K) = Arr1(I, J)
                Next
            Next
        End If
    Next
    ReDim TotalArr(N, M)
    For J = 1 To M
        For I = 1 To N
            TotalArr(I, J) = TranspArr(J, I)
        Next
    Next
    Set Sh = Sheets("Сборка")
    Sh.Range(ColName & FirstRow).Resize(N, M).Value = TotalArr
    Application.ScreenUpdating = True
    Exit Sub
RoutineGetRng:
    With Sh
        LastRow = .Cells(.Rows.Count, ColName).End(xlUp).Row
        Set Rng = Range(.Cells(FirstRow, ColName), .Cells(LastRow, ColName)).Resize(, M)
    End With
    N1 = Rng.Rows.Count
    Return
End Sub

Вложения

Сбор данных с нескольких листов.xls (34.5 Кб, 22 просмотров)

Источник

Ошибка 438 vba access

Check the VBA code to Fix Error 438

VBA Coding Made Easy

More on VBA Errors

Causes of Microsoft Visual Basic Runtime Error 438 VBA Issue:

How to Fix & Solve Microsoft Visual Basic Runtime Error 438 VBA Issue

1. Disable the Enhanced Protected Mode from Internet Explorer –

2. Install an Automatic Repair Tool on your Windows PC –

3. Uninstall Microsoft Works Add-in on your Windows PC –

4. Use a Registry Cleaner to Clean the Registry of your Windows –

5. Reinstall the Drivers for the Device on your PC –

6. Run a Full Scan of your Windows PC for Malware or Virus –

7. Create a System Restore Point on your Windows PC –

8. Troubleshoot & Run an Automatic Windows Repair on your PC –

9. Disable or Uninstall your Windows Antivirus Software on your PC –

10. Restart your Windows PC [OPTIONAL] –

О программе Runtime Ошибка 438

Определения (Бета)

Симптомы Ошибка 438 — Ошибка выполнения 438 — объект не поддерживает это свойство или метод

Причины Ошибка выполнения 438 — объект не поддерживает это свойство или метод — Ошибка 438

Методы исправления

Метод 1 — Закройте конфликтующие программы

Метод 2 — Обновите / переустановите конфликтующие программы

Метод 3 — Обновите программу защиты от вирусов или загрузите и установите последнюю версию Центра обновления Windows.

Метод 4 — Переустановите библиотеки времени выполнения

Метод 5 — Запустить очистку диска

Метод 6 — Переустановите графический драйвер

Метод 7 — Ошибка выполнения, связанная с IE

Другие языки:

ШАГ 1:

ШАГ 2:

ШАГ 3:

Question

Answers

А вот еще интересные материалы: