Posting the Wrong Video {Poka-Yoke}

Share on facebook
Share on twitter
Share on linkedin
I made a mistake and posted the wrong video when publishing a Quick Win video on Facebook. A typical response would be to delete the video and upload the correct one which I did. I could have moved on hoping that this wouldn’t happen again. This isn’t how mistake proofing a process works. Poka-Yoke isn’t comfortable with “Try harder next time” as a response to making a mistake. Instead take the time to eliminate the potential of making the mistake again. (If this is your first time hearing about Poka-Yoke learn more about it here!)

Current Process

Quick Win videos are currently selected from a folder with a collection of videos which isn’t a good set up for mistake proofing.Picture of video select options with the correct one and all potential mistakes Storing all Quick Win videos in one folder presents too many opportunities to make a mistake. There are currently 13 items in this folder meaning there are 12 opportunities to make a mistake. As I make more Quick Win videos this folder will only grow larger! My process must change to eliminate the potential of making the same mistake again.

New Process

Going forward I will store each individual Quick Win video in their own folder eliminating the potential of publishing the wrong video. Picture of video in own folderThis may seem like more work but it isn’t with VBA. Here is the code I am using to standardize this new process. If you want to see more VBA code visit our Macros page!
'Leverage & Lean "Less Clicks, More Results"
Sub NewQuickWin()
' Means variable is in use
Dim FolderPath As String '
Dim FolderObj As Object '
Dim QuickWinTitle As String '

'Insert a new Row in Excel
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove

'Set Quick Win Title
QuickWinTitle = InputBox("What is the title of this Quick Win video?", "New Quick Win")

'Populate Excel with values
Cells(3, 1).Value = QuickWinTitle & " [Quick Win!!!]"
Cells(3, 2).Value = "This a Quick Win video in 30 seconds or less.  This video will show you how to "
Cells(3, 3).Value = Date

'Set Folder Path
FolderPath = "C:\Users\lever\Desktop\Leverage & Lean\Media\Videos\Quick Wins\" & QuickWinTitle

'Create a new Folder
Application.ScreenUpdating = False
Set FolderObj = CreateObject("Scripting.FileSystemObject")
If FolderObj.FolderExists(FolderPath) Then
FolderObj.CreateFolder (FolderPath)
End If
Application.ScreenUpdating = True

'Set Path hyperlink to video
With ActiveSheet
 .Hyperlinks.Add Anchor:=.Range("E3"), _
 Address:=FolderPath, _
 ScreenTip:="", _
End With

'Finish with Formatting
With Selection
    .HorizontalAlignment = xlLeft
End With
With Selection
    .HorizontalAlignment = xlCenter
End With
With Selection
    .HorizontalAlignment = xlLeft
End With
With Selection
    .HorizontalAlignment = xlCenter
End With

ActiveSheet.Cells(1, 1).Select

End Sub
'Stay Awesome
This new macro is run with a Command Button to populate Excel with the new Quick Win informationQuick Win Macro

An InputBox helps me populate the Title in the first cell.Picture of video in own folder
This macro continues and populates the leading phrase of the video description. Next it creates a new folder to store the video for this Quick Win.

Continuous Improvement

Poka-Yoke is not a one and done mistake proofing solution. The wrong path can be used when uploading a Quick Win video so the potential for making a mistake still exist. That is why you must continuously improve processes to prevent future mistakes.

Search for more Articles

Recent Articles

(BUG) Outlook Quick Steps New Email To

The Problem:  Two emails appear when creating an Outlook Quick Step when selecting New Email To. To fix this you need to edit the Quick Step removing one of these New Message actions.

Looking for more?

Subscribe as an Insider to receive additional rights.

Contact Us

Looking to improve your computer processes?
Leverage & Lean is here to help!

Leverage & Lean

Is focused on improving computer processes by Leveraging programming and applying Lean principles. It is our goal to make you more efficient and effective on your computer producing “Less Clicks and More Results!”