May 2014 – Useful code

Month: May 2014

Java – Making a snake

Posted on May 23, 2014 by

As you probably know, I am an online student at the Software University in Bulgaria, Sofia. This week, we had to submit a simple game in Java, developed by me and 4 other online students as a team. After some…

Tagged with: Java Compiler to Exe, Java Game with code, Java Snake

VBA – Working with Classes from the Immediate Window

Posted on May 23, 2014 by

Vitosh Posted in VBA \ Excel

If you have some experience with VBA, you already have enjoyed the usefulness of the immediate window – it simply does anything! Anyway, when you try to enter a subroutine, a method or a function, declared in class, you receive…

Tagged with: vba class modules, VBA classes, vba immediate window

VBA – Adding useful shortcuts to VBA with MZ Tools

Posted on May 23, 2014 by

Vitosh Posted in VBA \ Excel

As I have already written in this article, the free MZ Tools add-in is a must for any VBA developer (or skilled secretary, as I have heard quite a lot). Anyway, in this article I will simply show how to…

Tagged with: MZ tools, vba shortcuts, vba shortcuts comments

VBA – Collections with Excel :)

Posted on May 19, 2014 by

Vitosh Posted in VBA \ Excel

Today I have learned that someone (most probably an engineer from MicroSoft) has tought of putting in VBA! Thus, making it really a fully functional programming language. Quite good! Long story short – what are collections? Collection is a built-in class…

Tagged with: VBA collection for-each, VBA Collections, VBA Excel

VBA – Quick Renamer of files in folders with VBA

Posted on May 10, 2014 by

Vitosh Posted in VBA \ Excel

Hi there, if you ever need a quick renamer of files in forlders – that is the VBA code you may use:

Option Explicit

Sub ChangeNames()

Dim fso As New filesystemobject

Dim fol As Object
Dim fil As Object
Dim counter As Integer
Dim digit As String
Dim sname As String

    Set fol = fso.GetFolder("C:\Users\chinese")

    For Each fil In fol.Files
        counter = Len(fil.Name)
        Debug.Print fil.Name
        digit = Left(fil.Name, counter - 4)
        sname = digit & "_Chinese.mp3"
        fil.Name = sname
        Debug.Print sname
    Next

End Sub

Option Explicit

Sub ChangeNames()

Dim fso As New filesystemobject

Dim fol As Object

Dim fil As Object

Dim counter As Integer

Dim digit As String

Dim sname As String

Set fol = fso.GetFolder("C:\Users\chinese")

For Each fil In fol.Files

counter = Len(fil.Name)

Debug.Print fil.Name

digit = Left(fil.Name, counter - 4)

sname = digit & "_Chinese.mp3"

fil.Name = sname

Debug.Print sname

End Sub

What it does? It enters the directory “C:\users\chinese” and renames any file there adding “_Chinese” to its…

Tagged with: code, rename, VBA

Book Review – Google Maps JavaScript API Cookbook – An excellent Cookbook with Great Recipes

Posted on May 4, 2014 by

Vitosh Posted in Review

In the last 3 weeks I have read the Google Maps JavaScript API Cookbook and I was quite satisfied with the experience. Click on the book to go to its site in packtpub.com So, what this book has to offer to a…

Java Script – Picking up coordinates of point in Google Maps

Posted on May 4, 2014 by

Vitosh Posted in Just Tricks

Three weeks ago I have started to read an outstanding book for the Google API. So far I have finished it and this is the third review of code I have done, based on the book. The previous two concern…

Java Script – Synchronization of three maps

Posted on May 3, 2014 by

Vitosh Posted in Just Tricks

Three weeks ago I have started to read an outstanding book for the Google API. Currently, I have read about 70% of it and I have found plenty of useful code to present. Here is the book: In the current…