Using Office365 Daily

These are some tips and tricks that you can use in your daily usage of Microsoft Office (whether you are using an Office365 subscription or not). Some of them are ones that I also use frequently. (For January 18th, 2017)


  • Usually, if you are a frequent use of the Excel Spreadsheets, you would create a sheet that does calculations. But many times we write complicated formulae that defy creation a second time – my advice would be to put that formula in a comment in one of the cells using it, so that you just need to select that cell to remember what formula has been used.
  • Try to create names in your worksheets, because they are really easy to reference and you need not remember which cell contains the formula. Say you have calculated a person’s age in Cell A2, then you can name the cell A2 as “Age”.


  • Most of us use Word for creating letters, memos and other correspondence with clients, customers, vendors and the like. It is a good practice to create templates and then create new documents from that template – the document will automatically update whenever you make changes to the template. Surprised?


  • The real challenge lies in creating a database that auto-updates from some external data source everytime you open it. In some of the applications that I have spent considerable time developing, every time you quit the application, it can eject a log that contains information in a format that is tabular. When you open the master database connected to that application as an Administrator, you are asked if you wish to import the log. Bingo – this gives you opportunities unlimited in the future developments, right?


  • NA


  • NA


  • NA

Install Office’2016?

If you wish to install Office’2016 and are prepared to pay Rs. 4200/- per annum for it, click this link below. You will then be taken to a screen that will ask for your login credentials, where you again have the option to login to an existing office365 account, and if you wish to create a new office365 account, if you do not have one already go to the CREATE MICROSOFT ACCOUNT and then log into it using the link below. From then on, just look for a link that looks like the screenshot below: (See Screenshot) and look for “INSTALL office 2016” link on that screen. That is it !! Cheers !install_office2016_screen

29-Oct-2016 | 19:38 Hours IST | Updated : 30-Oct-2016 | 19:01 Hours IST

Microsoft Access: Data Integration with Sharepoint and Office 365

Microsoft Access: Data Integration with SharePoint and Office 365

Add “(All)” to a Combo Box or List Box

Function AddAllToList(ctl As Control, lngID As Long, lngRow As Long,
_ lngCol As Long, intCode As Integer) As Variant
Static dbs As Database, rst As Recordset
Static lngDisplayID As Long
Static intDisplayCol As Integer
Static strDisplayText As String
Dim intSemiColon As Integer

On Error GoTo Err_AddAllToList
Select Case intCode
Case acLBInitialize ‘ See if function is already in use.
If lngDisplayID <> 0 Then
MsgBox “AddAllToList is already in use by another control!”
AddAllToList = False
Exit Function
End If
‘ Parse the display column and display text from Tag property.
intDisplayCol = 1
strDisplayText = “(All)”
If ctl.Tag <> “” Then
intSemiColon = InStr(ctl.Tag, “;”)
If intSemiColon = 0 Then
intDisplayCol = Val(ctl.Tag)
intDisplayCol = Val(Left(ctl.Tag, intSemiColon – 1))
strDisplayText = Mid(ctl.Tag, intSemiColon + 1)
End If
End If
‘ Open the recordset defined in the RowSource property.
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset(ctl.RowSource, dbOpenSnapshot)
‘ Record and return the lngID for this function.
lngDisplayID = Timer
AddAllToList = lngDisplayID
Case acLBOpen
AddAllToList = lngDisplayID
Case acLBGetRowCount ‘ Return number of rows in recordset.
On Error Resume Next
AddAllToList = rst.RecordCount + 1
Case acLBGetColumnCount ‘ Return number of fields (columns) in recordset.
AddAllToList = rst.Fields.Count
Case acLBGetColumnWidth
AddAllToList = -1
Case acLBGetValue
If lngRow = 0 Then
If lngCol = intDisplayCol – 1 Then
AddAllToList = strDisplayText
AddAllToList = Null
End If
rst.MoveFirst rst.Move
lngRow – 1
AddAllToList = rst(lngCol)
End If
Case acLBEnd lngDisplayID = 0
End Select
Exit Function
MsgBox Err.Description, vbOKOnly + vbCritical, “AddAllToList”
AddAllToList = False
Resume Bye_AddAllToList
End Function