Vba 1004 ошибка как исправить

Four ways to fix runtime error 1004 in Excel:

Microsoft Visual Basic for Applications (VBA) is developed to help users write programs for the Windows operating system. It runs as an internal programming language in Microsoft Office, such as Word, Excel, and PowerPoint.

Some users have reported that when running VBA in an Excel chart or trying to generate a Macro in Excel documents, an error message popped up saying: Runtime error 1004. And then they find themselves cannot access the Excel files. If you have the same encounter as these users, this post is the right place for you. You can find both the reasons and the corresponding solutions of this error code on this page.

Runtime Error Details

The error message contains more information than the error code 1004. Generally, follow the error code, you can see a brief description. The most repeated error messages are listed below:

1. Runtime error 1004: Application or object-defined error.
2. Runtime error 1004: Method Ranger of Object Worksheet failed.
3. Runtime error 1004: Copy Method of Worksheet Class failed.

The Reason Why You See Runtime Error 1004 in Excel

If you want to know how to fix runtime error 1004 in Excel properly, you need to understand what leads to this issue. The following are the most prominent reasons.

• Macro Name Error

The Macro you are running is copying the original worksheet to a workbook with a defined name that you did not save and close before running the Macro.

• File Conflict

When opening the VBA Excel file, it gets conflicted with other programs.

• Too Many Legend Entries

The Excel chart contains more legend entries than space available to display the legend entries on the chart.

• Excel File Corruption

Your .xls files got corrupted, infected, or damaged.

Although many reasons would cause this Excel error 1004 problem, luckily, some valid methods can help users re-access the files. Let’s check them one by one.

Fix 1. Delete the GWXL97.XLA Files to Fix Runtime Error 1004 in Excel

The easiest method to fix the Excel error 1004 is to find and delete the error file.

Step 1. Go to C:\Program Files\MS Office\Office\XLSTART.

Step 2. Find GWXL97.XLA file and delete it.

Step 3. Reopen your Excel file and check if the problem is solved.

Fix 2. Check the Trust Access to the VBA Project Object Model

Another solution you can try is to enable a VBA project trust option in Excel Trust Center. Follow the detailed steps and have a try.

Step 1. Open a blank Excel file and click «Files» on the upper left.

Step 2. Click Option and go to Trust Center.

Step 3. Find and enter the Trust Center Settings.

Step 4. Under Macro Settings, tick the option of «Trust access to the VBA project object model.»

Now you can check your Excel file.

Fix 3. Create Another Excel Template to Fix Runtime Error 1004 in Excel

This method could be a little bit complicated, but it’s useful and worth trying.

Step 1. Please start a new Excel workbook and make sure there is only one worksheet in it.

Step 2. Format the workbook first and then put the data you need onto it.

Step 3. Tap File > Save As, first enter the file name, and click the unfold arrow in Save as Type column.

Excel 2003: Choose Excel 97-2003 Template.

Excel 2007 or Later: Choose Excel Template.

Step 4. Click «Save» to confirm.

Now you can insert it programmatically by using the following code: Add Type:=path\filename. The file name is the one you set when you create the new Excel template.

Fix 4. Repair Corrupted Excel Files Due to Error 1004 

If all the above solutions can’t help you out, then there is one possibility that the Excel file you want to open is damaged. To fix a damaged Excel file, you can rely on file repair software. EaseUS Fixo Document Repair is a great choice.

With this tool, click the «Repair» button and wait for it to fix all the corrupted documents for you.

• Repair various corrupted files, including repairing Word, Excel, and PDF document 
• Fix unreadable contents in Word efficiently
• Repair corrupted PDF files, extract the text, comments, labels, graphics, etc. 
• Compatible with Microsoft Office 2019, 2016, 2013, 2010, & previous versions.

Download the software and follow the detailed steps below to fix corrupted Excel files.

Step 1. Download and launch Fixo on your PC or laptop. Choose «File Repair» to repair corrupted Office documents, including Word, Excel, PDF, and others. Click «Add Files» to select corrupted documents.

Step 2. To repair multiple files at once, click the «Repair All» button. If you want to repair a single document, move your pointer to the target file and choose «Repair». You can also preview the documents by clicking the eye icon.

Step 3. Click «Save» to save a selected document. Select «Save All» to save all the repaired files. Choose «View Repaired» to locate the repaired folder.

The Bottom Line

After reading, you must have a thorough understanding of how to fix Runtime error 1004. If you can make sure that the Excel file you want to open is valid, then the first three methods would help you out.

Once you got a damaged Excel file, a professional file recovery tool is a wiser choice. EaseUS Fixo is highly recommended by many users & IT professionals to help you repair Word, Excel, PowerPoint, and PDF files. 

	Возникает при переходе по ссылке из одного листа на другой

Сергей Пользователь Сообщений: 11251 Регистрация: 01.01.1970

Юрий я не рунописец но пока начинаю это читать 1004 Ошибка, определенная приложением или объектом. Довольно распространенное универсальное сообщение об ошибке. Данная ошибка возникает тогда, когда ошибка генерируется не в VBA. Другими словами, ошибка определяется в Excel (или в другом объекте) и передается в VBA. Также эта ситуация возникает в случае если ошибка генерируется специально (для этого используется метод Raise объекта Err), но она не определена в VBA Прикладывайте примеры Лень двигатель прогресса, доказано!!!

Юрий М Модератор Сообщений: 60912 Регистрация: 14.09.2012 Контакты см. в профиле	Юрий, я подправил название темы: так больше конкретики. Ведь с Вашим названием все вопросы по ошибкам можно смело задавать в Вашей теме. Так лучше? Ну почему бы самому не придумать нормальное название?

Сергей Пользователь Сообщений: 11251 Регистрация: 01.01.1970	Юрий Глодовский, я почему говорю про пример и почему так быстро привел описание ошибки, потому что ща сам сижу втыкаю в неё, так ка записал макрорекодером макрос попытался его усовершенствовать и мне выдает такую фигню и я не думаю что мы с вами делаем одно и тоже Лень двигатель прогресса, доказано!!!

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

Юрий М Модератор Сообщений: 60912 Регистрация: 14.09.2012 Контакты см. в профиле	Начните с того, что прогоните код пошагово: для начала выясним — на какой строке и в какой процедуре возникает эта ошибка.

Сергей Пользователь Сообщений: 11251 Регистрация: 01.01.1970	#7 16.05.2014 22:53:10 Цитата Юрий Глодовский пишет: У меня вопрос в какую сторону хотя бы копать. это не ко мне, сам тупил над такой же ошибкой около 30 минут, грохнул макрос рисую заново, но это чисто развлекуха под пиво к работе у меня ни как не относится Лень двигатель прогресса, доказано!!!

Юрий Глодовский Пользователь Сообщений: 137 Регистрация: 17.03.2013

#8 16.05.2014 23:42:20 Юрий М, в третьей строке, тот что If Not Intersect… Код Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)     '// Проверяем, что выделенная ячейка пересеклась с колонкой "А"     If Not Intersect(Target, Columns("C")) Is Nothing And Target.Parent.Name = "База" Then         '//Проверяем, что это не первая строка (там у нас будет заголовок таблицы)         If Target.Row <> 1 Then             If Target.Cells.Count = 1 Then '// Если выделена только одна ячейка                 '// Проверяем, что ячейка не пуста                 If Len(Target.Offset(0, -2).Value) <> 0 Then                     '// На всякий случай - предотвращение ошибок во время файловых операций                     On Error Resume Next                     '// Внимание Mkdir (в отличие от DOS-версии) не умеет создавать цепочку папок                     '// Это означает, что папка, в которой нужно создавать новую, уже должна существовать                     Dim HomeDir$                     HomeDir = "D:\Base" '// Задаем исходную папку (у Вас - это: "D:\Base")                     MkDir (HomeDir & "\" & Target.Offset(0, -2).Value)                     If Err = 0 Then Cells(Target.Row, "C").Formula = "=HYPERLINK(""" & HomeDir & "\""&A" & Target.Row & ",""IIIII"")"                 End If             End If         End If     End If End Sub

Сергей Пользователь Сообщений: 11251 Регистрация: 01.01.1970	#9 16.05.2014 23:44:38 Цитата Юрий М пишет: Начните с того, что прогоните код пошагово: для начала выясним — на какой строке и в какой процедуре возникает эта ошибка. Юрий Глодовский, обращайте внимание на советы, если не знаете как это сделать, спрашивайте, дадут либо ссылку либо совет как это сделать, КОТ хоть и сидит со скелетом но форумчан редко ест Лень двигатель прогресса, доказано!!!

Hugo Пользователь Сообщений: 23706 Регистрация: 22.12.2012	#10 16.05.2014 23:46:23 У меня нет ошибки. Но попробуйте Код     If Not Intersect(Target, ActiveSheet.Columns("C")) Is Nothing And Target.Parent.Name = "База" Then кто его знает… или Код     If Not Intersect(Target, target.parent.Columns(3)) Is Nothing And Target.Parent.Name = "База" Then Изменено: Hugo — 17.05.2014 08:31:16

Юрий М Модератор Сообщений: 60912 Регистрация: 14.09.2012 Контакты см. в профиле	Без файла сложно, конечно… Лист «База» есть?

Hugo Пользователь Сообщений: 23706 Регистрация: 22.12.2012	Юра, у меня листа База не было. В начале Это не влияет. Нет листа — не выполняется условие всего лишь…

Сергей Пользователь Сообщений: 11251 Регистрация: 01.01.1970	вообще не уверен но со своей ошибкой кажись разобрался я когда писал рекодером копировал формулы из одного документа в другой, когда они оба были открыты макрос работал, после того как я закрыл файл из которого копировал формулы начал запускать макрос начала вылетать эта ошибка Лень двигатель прогресса, доказано!!!

Юрий Глодовский Пользователь Сообщений: 137 Регистрация: 17.03.2013	#14 17.05.2014 00:00:16 Цитата Hugo пишет: If Not Intersect(Target, target.parent.Columns(3)) Is Nothing And Target.Parent.Name = «База» Then Этот вариант помог. Большое спасибо. Сергей, посмотрите, может вам пригодится.

Юрий М Модератор Сообщений: 60912 Регистрация: 14.09.2012 Контакты см. в профиле	#15 17.05.2014 00:02:43 Немного смущает несоответствие комментария и строки кода. Комментарий ошибку не вызовет, но всё же: Код '// Проверяем, что выделенная ячейка пересеклась с колонкой "А" А проверяем столбец С.

Сергей Пользователь Сообщений: 11251 Регистрация: 01.01.1970	#16 17.05.2014 00:13:50 Цитата Юрий Глодовский пишет: может вам пригодится. в будущем может, на данном моменте эволюции понимания в VBA у меня даже таких строк нет Лень двигатель прогресса, доказано!!!

Казанский Пользователь Сообщений: 8839 Регистрация: 11.01.2013	#17 17.05.2014 01:13:52 Замечу, что Target.Parent это Sh, который передается в процедуру. Лучше разбить первую проверку на две, чтобы сначала шла быстрая операция сравнения имени, а потом громоздкий Intersect: Код If Sh.Name = "База" Then   If Not Intersect(Target, Sh.Columns(3)) Is Nothing Then

 Summary:

In this post, I have included the complete information about Excel runtime error 1004. Besides that I have presented some best fixes to resolve runtime error 1004 effortlessly.

To fix Runtime Error 1004 in Excel you can take initiatives like uninstalling Microsoft Work, creating a new Excel template, or deleting The “GWXL97.XLA” File. If you don’t have any idea on how to apply these methods then go through this post.

Here in this article, we are going to discuss different types of VBA runtime error 1004 in Excel along with their fixes.

What Is Runtime Error 1004 In VBA Excel?

Excel error 1004 is one such annoying runtime error that mainly encounters while working with the Excel file. Or while trying to generate a Macro in Excel document and as a result, you are unable to do anything in your workbook.

This error may cause serious trouble while you are working with Visual Basic Applications and can crash your program or your system or in some cases, it freezes for some time. This error is faced by any versions of MS Excel such as Excel 2007/2010/2013/2016/2019 as well.

Error Detail:

Error Code: run-time error 1004

Description: Application or object-defined error

Screenshot Of The Error:

Don’t worry you can fix this Microsoft Visual Basic runtime error 1004, just by following the steps mentioned in this post. But before approaching the fixes section catch more information regarding runtime error 1004.

Excel VBA Run Time Error 1004 Along With The Fixes

The lists of error messages associated with this Excel error 1004 are:

1. VB: run-time error ‘1004’: Application-defined or object-defined error
2. Excel VBA Runtime error 1004 “Select method of Range class failed”
3. runtime error 1004 method range of object _global failed visual basic
4. Excel macro “Run-time error ‘1004″
5. Runtime error 1004 method open of object workbooks failed
6. Run time error ‘1004’: Method ‘Ranger’ of Object’ Worksheet’ Failed
7. Save As VBA run time Error 1004: Application defined or object defined error

Let’s discuss each of them one by one…!

#1 – VBA Run Time Error 1004: That Name is already taken. Try a different One

This VBA Run Time Error 1004 in Excel mainly occurs at the time of renaming the sheet.

If a worksheet with the same name already exists but still you are assigning that name to some other worksheet. In that case, VBA will throw the run time error 1004 along with the message: “The Name is Already Taken. Try a different one.”

Solution: You can fix this error code by renaming your Excel sheet.

#2 – VBA Run Time Error 1004: Method “Range” of object’ _ Global’ failed

This VBA error code mainly occurs when someone tries to access the object range with wrong spelling or which doesn’t exist in the worksheet.

Suppose, you have named the cells range as “Headings,” but if you incorrectly mention the named range then obviously you will get the Run Time Error 1004: Method “Range” of object’ _ Global’ failed error.

Solution: So before running the code properly check the name of the range.

# 3 – VBA Run Time Error 1004: Select Method of Range class failed

This error code occurs when someone tries to choose the cells from a non-active sheet.

 Let’s understand with this an example:

Suppose you have selected cells from A1 to A5 from the Sheet1 worksheet. Whereas, your present active worksheet is Sheet2.

At that time it’s obvious to encounter Run Time Error 1004: Select Method of Range class failed.

Solution: To fix this, you need to activate the worksheet before selecting cells of it.

#4 – VBA Runtime Error 1004 method open of object workbooks failed

This specific run time Error 1004 arises when someone tries to open an Excel workbook having the same workbook name that is already open.

In that case, it’s quite common to encounter VBA Runtime Error 1004 method open of object workbooks failed.

Solution: Well to fix this, first of all close the already opened documents having a similar name.

#5 – VBA Runtime Error 1004 Method Sorry We Couldn’t Find:

The main reason behind the occurrence of this VBA error in Excel is due to renaming, shifting, or deletion of the mentioned path.

The reason behind this can be the wrong assigned path or file name with extension.

When your assigned code fails to fetch a file within your mentioned folder path. Then you will definitely get the runtime Error 1004 method. Sorry, and We couldn’t find it.

Solution: make a proper check across the given path or file name.

#6 – VBA Runtime Error 1004 Activate method range class failed

Behind this error, the reason can be activating the cells range without activating the Excel worksheet.

This specific error is quite very similar to the one which we have already discussed above i.e Run Time Error 1004: Select Method of Range class failed.

Solution: To fix this, you need to activate your excel sheet first and then activate the sheet cells. However, it is not possible to activate the cell of a sheet without activating the worksheet.

Why This Visual Basic Runtime Error 1004 Occurs?

Follow the reasons behind getting the run time error 1004:

1. Due to corruption in the desktop icon for MS Excel.
2. Conflict with other programs while opening VBA Excel file.
3. When filtered data is copied and then pasted into MS Office Excel workbook.
4. Due to application or object-defined error.
5. A range value is set programmatically with a collection of large strings.

Well, these are common reasons behind getting the VBA runtime error 1004, now know how to fix it. Here we have described both the manual as well as automatic solution to fix the run time error 1004 in Excel 2016 and 2013. In case you are not able to fix the error manually then make use of the automatic MS Excel Repair Tool to fix the error automatically.

Follow the steps given below to fix Excel run time error 1004 :

1: Uninstall Microsoft Work

2: Create New Excel Template

3: Delete The “GWXL97.XLA” File

Method 1: Uninstall Microsoft Work

1. Go to the Task Manager and stop the entire running programs.

2. Then go to Start menu > and select Control Panel.

3. Next, in the Control Panel select Add or Remove Program.

4. Here, you will get the list of programs that are currently installed on your PC, and then from the list select Microsoft Work.

5. And click on uninstall to remove it from the PC.

It is also important to scan your system for viruses or malware, as this corrupts the files and important documents. You can make use of the best antivirus program to remove malware and also get rid of the runtime error 1004.

Method 2: Create New Excel Template

Another very simple method to fix Excel runtime error 1004 is by putting a new Excel worksheet file within a template. Instead of copying or duplicating the existing worksheet.

Here is the complete step on how to perform this task.

1.Start your Excel application.

2. Make a fresh new Excel workbook, after then delete the entire sheets present on it leaving only a single one.

3. Now format the workbook as per your need or like the way you want to design in your default template.

4. Excel 2003 user: Tap to the File>Save As option

OR Excel 2007 or latest versions: Tap to the Microsoft Office button after then hit the Save As option.

5. Now in the field of File name, assign name for your template.

6. On the side of Save as type there is a small arrow key, make a tap on it. From the opened drop menu

• Excel 2003 users have to choose the Excel Template (.xlt)

• And Excel 2007 or later version have to choose the Excel Template (.xltx)

7. Tap to the Save.

8. After the successful creation of the template, now you can programmatically insert it by making use of the following code:
Add Type:=path\filename

Remarks: 

From the above code, you have to replace the path\filename with the complete path including the file name. For assigning the exact location of the sheet template you have just created.

Method 3: Delete The “GWXL97.XLA” File

Follow another manual method to fix Excel Runtime Error 1004:

1. Right-click on the start menu.

2. Then select the Explore option.

3. Then open the following directory – C:\Program Files\MSOffice\Office\XLSTART

4. Here you need to delete “GWXL97.XLA” file

5. And open the Excel after closing the explorer

You would find that the program is running fine without a runtime error. But if you are still facing the error then make use of the automatic MS Excel Repair Tool, to fix the error easily.

Automatic Solution: MS Excel Repair Tool

MS Excel Repair Tool is a professional recommended solution to easily repair both .xls and .xlsx file. It supports several files in one repair cycle. It is a unique tool that can repair multiple corrupted Excel files at one time and also recover everything included charts, cell comments, worksheet properties, and other data. This can recover the corrupt Excel file to a new blank file. It is extremely easy to use and supports both Windows as well as Mac operating systems.

* Free version of the product only previews recoverable data.

Steps to Utilize MS Excel Repair Tool:

Conclusion:

Hope this article helps you to repair the runtime error 1004 in Excel and recovers Excel file data. In this article, we have provided a manual as well as automatic solution to get rid of Excel run-time error 1004. You can make use of any solution according to your desire.

Good Luck!!!