sheetsdata

  1. N

    vba userform listbox with key search from 2 big table then update data with another userform

    Dear member, I try to make key search then get from 2 tables in "data entry" in to listbox as pix below Sorry I don't know how to show my pix here https://drive.google.com/file/d/1pnGzR1oUdX1KvCq_yUxBJrTC2jKnmtXS/view?usp=sharing It work perfect for me 1 search but I do the same 100 times for...
  2. Mackeral

    Can't writ out a Workbook

    This is the code:Sub Workbook_Save(Path, Workbook_Name, _ Optional File_Format As XlFileFormat = xlOpenXMLWorkbookMacroEnabled) ' Save the workbook to the indicated file. If Right(Path, 1) <> "\" Then Path = Path & "\" FileName = Path & Workbook_Name...
  3. R

    Stacked If statements

    Hi, I have some code below. it works up to the line calculate cost where it just returns the value from the first if statement. Please help Sub data_sorting() Dim Bcell As Range Dim NextRow Dim I As Integer WS_Count = ActiveWorkbook.Worksheets.Count 'Jan...
  4. Nitehawkhp

    Assign a Userform to a control button on a worksheet

    I need help creating a control button on my worksheet named 'Data Validation'. That will open a Userform named 'AdjustResetButtonForm' containing the follow code: TextBox1.Value = Sheets("Data Validation").Range("X3").Value TextBox2.Value = Sheets("Data Validation").Range("X4").Value...
  5. M

    Sorting data changes all columns

    I did a transfer using VBA. I am having trouble now filtering the data and sorting it. I used the following in VBA: Sub Copy() Sheets("Data Entry").Range("A5:A654").Copy Sheets("Try1").Range("A5") Sheets("Data Entry").Range("A5:A654").Copy Sheets("Try1").Range("D5") Sheets("Data...
  6. H

    VBA Progress Indicator within a nextrow loop

    Hello all, Looking for help to add a userform pop-up status indicator My current code that runs is below and I would like a user form to pop up and actively tell me the % complete % complete is found by simple division = count of non empty cells in column Q / count of non empty cells in...
  7. S

    Need help speeding up my Macro

    Every time I run my macro, it takes about 1 min to execute. How can I fix this? Sub Button1_Click()Dim myRange As Range Set myRange = ThisWorkbook.Worksheets("Data Entry").Range("Data") Dim lastrow As Long Dim whichsheet As String whichsheet = InputBox("In which sheet do you wish to enter...
  8. Guzzlr

    Copy Existing Sheet and Paste Special Values with a New Name

    Hello All, I’m having a few issues with the Code: Dim sht As Worksheet Dim ASY As Worksheet Dim DATA As Worksheet Set DATA = Sheets("DATA") DATA.Copy Selection.PasteSpecial Paste:=xlPasteValues ' After:=DATA Columns("N:N").Select Selection.AutoFilter...
  9. C

    Slowest Macro ever - Please Help! Copy Paste

    I have written this over and over again. Its takes 30 seconds. I am a novice doing this a few months. I should be defining...tried that but could not get this to speed up. It works but looks embarrassing, I am aware. After a couple of days of trying to speed it up, I am turning to the Guru's...
  10. F

    Problem with VBA button to refresh worksheets

    Hi everyone I've created a button (with a VBA script behind it) to update all worksheets in my spreadsheet. The problems I'm having are as follows: 1. Even though I'm asking the script to take me back to the "DONUT VIEW" sheet it isn't. It does briefly but then seems to run through the entire...
  11. C

    New entry of number, if it already exists, it will not let user enter

    Here is a code that gets a formulated line from another sheet, inserts and then takes data from another sheet to transpose it. I wanted to add to this code, but if the number entered in E5 already exists, I wanted a message to pop ups and say, "Job already exists" and they click ok. myabe you...
  12. B

    Excel for Mac Runtime Error 1004

    Hi All, This piece of code is throwing an error 1004 when run on an Excel for Mac spreadsheet on the second last line where it pastes the copied cell formula. This works perfectly on Windows PC. Any help appreciated. thanks Ryan Dim Max, c, StartCol as Integer Dim rng as Range c =...
  13. S

    enter vba code

    Sub Clear_Sheet() Application.ScreenUpdating = False Dim Msg As String, Ans As Variant Msg = "Are you sure you want to clear all data in 'Data Sheet'" Ans = MsgBox(Msg, vbYesNo) Select Case Ans Case vbYes Sheets("Data...
  14. J

    Code does not work - clear contents

    Hi guys, I set a button on another sheet where I wanna use my code, However this code does not work when the sheet is hided. Can someone tell me why? Sub Copydata() Dim iLastRow As Long ActiveWorkbook.Sheets("Clean1").Select Cells.ClearContents Sheets("Data Dump to be...
  15. C

    Macro Clean Up

    Hi all, I have the following Macro but want to clean it up, Essentially it inputs a cycle step Number on one sheet then copies the values in a named range and pastes them into a another sheet by selecting a named range. Any help is much appreciated. The code Module is in the following...
  16. G

    How to insert Data form Userfomr into Spreadsheet

    Here is the code I have, but it is not working. Private Sub CommandButton1_Click() Dim emptyRow As Long 'Activate Data Request Worksheet Sheets("Request Data").Activate 'Determine emptyRow emptyRow = WorksheetFunction.CountA(Range("A:A")) + 1 'Transfer information Sheets("Data...
  17. C

    Help with VBA code

    I am trying to copy a range from one sheet and paste it at the next available row on another sheet. My code is as follows. Sub Archive() Sheets("Data Entry").Select Range("A3:AC31").Select Selection.Copy Sheets("Data Archive").Select Range("A" & Rows.Count).End(xlUp).Offset (1)...
  18. Z

    Need help updating sheets name to look into workbook VBA

    Hi so I run this macro in my workbook now, but I need to change this now to look into a different workbook called "Time" sheet name --->Sheets("Name Correction"). I need to add to all of these below to look at this sheet name but in a different book called Time--> Sheets("Name Correction"). Any...

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top