Search:

Type: Posts; User: dmt32; Keyword(s):

Page 1 of 6 1 2 3 4

Search: Search took 0.22 seconds.

  1. Re: VBA change sheet on data validation selection

    Welcome - thanks for feedback

    Dave
  2. Re: VBA change sheet on data validation selection

    You can try following

    Ensure that your data validation list includes MENU as a selection choice

    DELETE line shown in red



    Private Sub Worksheet_Change(ByVal Target As Range)
    Dim ws...
  3. Re: VBA change sheet on data validation selection

    At least ONE sheet must remain visible - You have hidden the MENU sheet which, for code I posted, should remain visible.

    Dave
  4. Replies
    13
    Views
    280

    Re: userform editing & listbox issue

    Hi,
    glad it worked ok but I posted an early development copy

    Following has a common procedure to Add or update record.





    Option Explicit
  5. Re: Help with retrieving data from multiple workbooks - VBA for an amateur

    Hi,
    untested but see if this update to your code does what you want



    Sub ExtractCells()

    Dim MySheet As String, SheetName As String
    ' looping params
    Dim Directory As String,...
  6. Re: VBA change sheet on data validation selection

    Code should do that but as written, it is case sensitive.

    Try this update



    Private Sub Worksheet_Change(ByVal Target As Range)
    Dim ws As Worksheet
    Dim rng As Range
    Set rng =...
  7. Re: VBA change sheet on data validation selection

    Hi,
    Yes code goes in your Menu Tab code page

    solution, displays Menu Tab & Selected Tab name from your data validation list. All other sheets will be hidden.

    If this is not quite what you want...
  8. Re: VBA change sheet on data validation selection

    untested - but try this



    Option Explicit


    Private Sub Worksheet_Change(ByVal Target As Range)
    Dim ws As Worksheet
    Dim rng As Range
  9. Re: VBA change sheet on data validation selection

    Hi,
    have a look here:https://contexturesblog.com/archives/2016/06/16/show-specific-sheets-in-excel/

    and see if this will help you with your project.

    You can download a free working example of...
  10. Replies
    29
    Views
    313

    Re: Loop each sheet between two sheets

    Hi,
    to do what you want you can use the sheets Index property



    Dim i As Integer
    For i = Worksheets("ProgramStart").Index + 1 To Worksheets("IDcheck").Index - 1
    MsgBox Worksheets(i).Name...
  11. Replies
    4
    Views
    80

    Re: Expand on current code in use

    Hi,
    see if this does what you want



    Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Count > 1 Then Exit Sub
    On Error GoTo myerror
  12. Re: Userform VBA option button get selected option

    Not as far as I am aware unless another here reading this thread can offer further insight.

    All suggestions posted are workarounds & any one may offer something that will go a little way in...
  13. Re: Userform VBA option button get selected option

    Hi,
    If you just want to establish the status for a named group of controls (True / False) you could as an idea, create a function

    See if following will do what you want



    Function...
  14. Replies
    13
    Views
    280

    Re: userform editing & listbox issue

    Hi,
    Finally found moment to look at your code & made some changes

    Make backup of your workbook & replace ALL code in your form with following:





    Option Explicit
  15. Re: Help with VBA issue using command button on separate page

    Normally, you test in the Range.Find function but you have a search box so can test for no match there & give user opportunity to enter another value



    Sub SearchForString()
    Dim...
  16. Replies
    13
    Views
    280

    Re: userform editing & listbox issue

    for those that may be able to assist, some sample data included that relates to issues you are having would also be very helpful

    Dave
  17. Replies
    13
    Views
    280

    Re: userform editing & listbox issue

    As yours is a large project its sometimes difficult to test code posted - may get more responses if you could place copy of your workbook with sample data in a dropbox & provide link to it here.
    ...
  18. Re: Help with VBA issue using command button on separate page

    You currently copy the EntireRow so to place copied data to Range that is not the same size, you will need to size the data you are copying

    something like this

    change this line


    ...
  19. Thread: Stock Control

    by dmt32
    Replies
    1
    Views
    84

    Re: Stock Control

    Hi,
    welcome to forum

    Hi,
    What you want to do possibly can be done but likely to be a lot of work & still may not fully offer functionality you may have in mind

    Have a read of this thread from...
  20. Re: Help with VBA issue using command button on separate page

    The Columns reference (shown in bold) does not have a workbook and worksheet associated with it. Without an explicit reference, Columns refers to the ActiveSheet by default. So your code may fail...
  21. Replies
    6
    Views
    106

    Re: Code lags when run

    Hi

    try



    Private Sub Worksheet_Change(ByVal Target As Range)
    On Error GoTo myerror
    If Not Intersect(Target, Range("D5:D35")) Is Nothing Then
    Application.EnableEvents = False
  22. Thread: find function

    by dmt32
    Replies
    3
    Views
    27

    Re: find function

    welcome - thanks for feedback

    Dave
  23. Thread: find function

    by dmt32
    Replies
    3
    Views
    27

    Re: find function

    Hi try



    Set SearchRange = Range("A18:A" & LRow).Find(CbName, LookIn:=xlFormulas, LookAt:=xlWhole)


    Dave
  24. Replies
    4
    Views
    67

    Re: Workbook is Nothing

    Hi,
    you have declared you object variables Public and maybe they are holding a previous value?



    Public AWorkbook As Workbook
    Public BWorkbook As Workbook
    Public ASheet As Worksheet
    Sub...
  25. Re: Help with VBA issue using command button on separate page

    Hi,
    welcome to forum

    See if this update to your code helps



    Sub SearchForString()
    Dim LSearchValue As String
    Dim RefCount As Long
Results 1 to 25 of 150
Page 1 of 6 1 2 3 4