My organization is currently using SCCM version 1902.

We have some Windows 7 machines and Windows 10 initial install machines that both need to be upgraded to the latest version of Windows 10 using SCCM.

All of these computers are joined to the Active Directory domain and have the SCCM client installed.

SCCM is currently configured to load the latest Windows 10 operating system to computers and virtual machines using PXE boot. Now we need to upgrade these existing Windows operating systems to Windows 10.

What are the steps to upgrading these existing operating systems to the most current version of Windows 10?

I would like to extract the location,city,country etc.from the attach file in vba.
text.txt

My company is migrating from SharePoint 2010 and many of our users have extensive "My Links".  Since the "My Links" functionality is not in SharePoint Online, how do we provide this?  

Is there a third party web part?
Is there a way to do this with custom code/extensions/pages, etc?  

I know that in SharePoint 2010 I can go to "http://siteurl/_layouts/MyQuickLinks.aspx" to see my lists, but no easy way to download all of the data and especially for all the users.  

Ideally we find a way to export each user's links and provide them in a similar link in SharePoint Online.  
At a minimum, need to capture everyone's links and make them available in some format in SharePoint Online once we turn off SharePoint 2010.  

Any ideas/Suggestions?

Hello experts,

I am not fully satisfied with windows built in search feature.
I am looking for a light, streamline and user friendly alternative to windows search feature.
Some key requirements:
-Have an history follow-up of search performed
-Large filter options such as extension, location, type, date ranges, file content (if possible)
-Portable version
...
Thank you in advance for your help.

We need some template or forms for Sharepoint pages and I want to ask Is it possible to do in Sharepoint Online:
Page with form "Holiday request". Employees fulfil this request with some date range - from when to when they will be absent. After submitting a request it is being sent to the right person who can approve or decline. When this person approves it, the correct date range will appear in a group calendar.
Unfortunately, most of the tutorials and guides refer to the previous versions of Sharepoint, not to Sharepoint Online with modern sites.

As you can see from my screen shot, I’m using the following sub routine to link various worksheets from ExcelFile.xlsx into my database. As shown below, I’ve linked only four worksheets. However, my actually worksheet has many more tabs that I need to link. Also, the tab names are not constant. In other words, I could have three worksheets named like: 1111, 2222, 3333. Then at a later time for the exact same file, I could have four worksheets with multiple other names like: AAAA, BBBB, CCCC, DDDD.

Right now, it’s a manual process for me to update this code each time a sheet name changes or is removed. I’d like to modify this code to be more dynamic by accomplishing the following:

1.      First delete all database table objects that have a string of 4 characters in their name (e.g. 1111, 2233, AABC)
2.      Link all worksheet tabs that have a string of 4 characters in their name from ExelFile.xlsx

I'm using MS office 2016. Any Expert suggestion on this is greatly appreciated! =)

Private Sub LinkSpreadSheets()

Dim Fpath As String, _
  XLname1 As String, _
  tb1 As String, _
  tb2 As String, _
  tb3 As String, _
  tb4 As String

Fpath = Environ("USERPROFILE") & "\Documents\databases"

XLname1 = "\ExcelFile.xlsx"
                   
tb1 = "1001"
tb2 = "2001"
tb3 = "3001"
tb4 = "F008"

With DoCmd

    .DeleteObject acTable, "1001"
    .DeleteObject acTable, "2001"
    .DeleteObject acTable, "3001"
    .DeleteObject acTable, "F008"

    .TransferSpreadsheet acLink, , tb1,

Select all Open in new window

…

I have a Windows desktop application that I need to be used by several people from different locations around the country.
Please advise what I can do about it.
Thanks

Luis R
Mexico

Trouble adding comma to bar graph data using Windows Chart Class

I am using the library:
System.Windows.Forms.DataVisualization.Charting

and found I could format (with comma) for values > 1,000

with this line of code:
ca.AxisY.LabelStyle.Format = ("##,#");

But, I can't figure out how to get the data to display also with the comma.

Best I get is the following:

Here is the Microsoft reference document:
https://docs.microsoft.com/en-us/dotnet/api/system.windows.forms.datavisualization.charting.chart?view=netframework-4.0

Hello experts,
I have the following procedure:

Sub Add_Values_Multiple_Columns()
    Dim wsActive    As Worksheet
    Dim wsOutput    As Worksheet
    Dim strCol      As Variant
    Dim strColList  As String
    Dim lngLastRow  As Long
    Dim lngLastCol  As Long
    Dim shName      As String
    
    Application.ScreenUpdating = False
    
    Set wsActive = ActiveSheet
    
    strColList = InputBox("Please report column letter(s) following by ; in which you want to apply procedure," _
                          & ": A for single column A;C;D for multiple columns", "Choose Column Letter(s)")
    If strColList = vbNullString Then
        MsgBox ("No input!")
        Exit Sub
    End If
    
    For Each strCol In Split(strColList, ";")
        If Not ValidCellReference(strCol) Then
            MsgBox strCol & " is not a valid column letter.", vbExclamation
            Exit Sub
        End If
    Next strCol
    
    Set wsOutput = Worksheets.Add(after:=Worksheets(Worksheets.Count))
        
    For Each strCol In Split(strColList, ";")
        lngLastRow = Range(strCol & Rows.Count).End(xlUp).Row
        If wsOutput.Range("A1") = "" Then
            lngLastCol = 1
        Else
            lngLastCol = wsOutput.Cells(1, Columns.Count).End(xlToLeft).Column + 1
        End If
        lngLastRow = wsActive.Range(strCol & Rows.Count).End(xlUp).Row
        wsActive.Range(strCol & "1:" & strCol & lngLastRow).Copy wsOutput.Cells(1, lngLastCol)
    Next
    
    shName = 

Select all Open in new window

…

Hi Experts,
I have a sheet that has a list of names down one side, and a list of places across the top.
Some intersecting cells are filled red. I want to type a name into a cell and the list of places (column headers) will show up.
Please see example.
All cells have formulas or arrays already, including the red ones. This sheet is pulling data from another sheet to determine which cells will turn red if a condition is already met.

Thanks experts
Chris
Book2.xlsx

Hello Experts,
I have the following procedure which allows me to loop on multiple columns and add default values.

Sub Add_Values_Multiple_Columns()

    Dim strCol As Variant
    Dim strColList As String
    Dim lngLastRow As Long, lngRow As Long
    Dim strToReplaceWith As String
    
    
    strToReplaceWith = InputBox("Please input the Value which should replace the values of the Reported Columns.")
    
    If strToReplaceWith = "" Then
        MsgBox "You didn't input any value.", vbExclamation
        Exit Sub
    End If
    

    strColList = InputBox("Please report column letter(s) following by ; in which you want to apply procedure," _
                          & ": A for single column A;C;D for multiple columns", "Choose Column Letter(s)")
    If strColList = vbNullString Then
        MsgBox ("No input!")
        Exit Sub
    End If
    
    For Each strCol In Split(strColList, ";")
        If Not ValidCellReference(strCol) Then
            MsgBox strCol & " is not a valid column letter.", vbExclamation
            Exit Sub
        Else
            lngRow = Range(strCol & Rows.Count).End(xlUp).Row
            If lngRow > lngLastRow Then lngLastRow = lngRow
        End If
    Next strCol
    
    For Each strCol In Split(strColList, ";")
        If lngLastRow > 1 Then Range(strCol & "2:" & strCol & lngLastRow).Value = strToReplaceWith
    Next

    Exit Sub

Error_Routine:
    MsgBox Err.Description, vbExclamation, "Something went wrong!"
    
End Sub

Select all Open in new window

I would like to take as a reference the loop on multiple columns part in order to cover the following requirement:
1.      Display inputbox: "Report columns that you want to copy at Output sheet: example: C;E;D
2.      Generate Ouput sheet with the the following name: Output & format(now,"yyyymmddmmss")
3.      Copy the columns reported in first inputbox in Output sheet.
I attached dummy file with Activesheet and Output sheet.
If you have questions, please contact me.
Dummy-file-copy-multiple-columns.xlsx

hi i want to copy all worksheets data into single master sheet excluding 1st worksheet
i am using the following vba code
Sub ConsolidateData()
    Dim wrk As Workbook 'Workbook object - Always good to work with object variables
    Dim sht As Worksheet 'Object for handling worksheets in loop
    Dim trg As Worksheet 'Master Worksheet
    Dim rng As Range 'Range object
    Dim colCount As Integer 'Column count in tables in the worksheets
     
    Set wrk = ActiveWorkbook 'Working in active workbook
     
    For Each sht In wrk.Worksheets
        If sht.Name = "MasterSheet" Then
            MsgBox "There is a worksheet called as 'Master'." & vbCrLf & _
            "Please remove or rename this worksheet since 'Master' would be" & _
            "the name of the result worksheet of this process.", vbOKOnly + vbExclamation, "Error"
            Exit Sub
        End If
    Next sht
     
     'We don't want screen updating
    Application.ScreenUpdating = False
     
     'Add new worksheet as the last worksheet
    Set trg = wrk.Worksheets.Add(After:=wrk.Worksheets(wrk.Worksheets.Count))
     'Rename the new worksheet
    trg.Name = "Mastersheet2"
     'Get column headers from the first worksheet
     'Column count first
    Set sht = wrk.Worksheets(2)
    colCount = sht.Cells(1, 255).End(xlToLeft).Column
     'Now retrieve headers, no copy&paste needed
    With trg.Cells(1, 1).Resize(1, colCount)
        .Value = sht.Cells(1, 1).Resize(1, …