Bu yazımızda temizlenmiş ve etiketlenmiş görüntü verisinden JSON formatında veri setini oluşturmak için Office Excel’den nasıl faydalanacağımızı göstereceğim.
İlk aşamada etiketlenmiş verimizi setimizin yolunu kopyalayıp “C:\xampp\htdocs\data_tag\tagged” komut istemini açıyoruz. (Resim 1)
“cd C:\xampp\htdocs\data_tag\tagged” komutu ile bu klasöre geçiş yapıyoruz. “dir > a.txt” komutu tüm dosyaların listesini a.txt dosyasına yazdırıyoruz. (Resim 2)
Bu dosyayı Notepad++ programı ile açıp klavyede Shift+Alt tuşlarına bastıktan sonra sadece dosya adlarını seçip Excel’e kopyalıyoruz. (Resim 3)
Excel’e kopyaladığımız dosya adlarını ayıklamak için “Veri –> Metni Sütunlara Dönüştür” aracını kullanıyoruz. (Resim 4)
Bu verilerden JSON dosyamızı oluşturmak için Örnek JSON dosyamızı inceleyip gerekli Excel formülünü yazıyoruz. (Resim 5)
Excel dosyamızı makroları çalıştırması için “.xlsm” uzantılı olarak kaydediyoruz. (Resim 6)
Artık Excel dosyamız üzerinde makro kodumuzu (VBA) yazabiliriz. Bunun için Excel’de “Geliştirici –> Makrolar” menüsüne tıklıyoruz. Gelen pencereye makro adını yazıp “Oluştur” a tıklıyoruz. Gelen ekranda aşağıdaki VBA kodunu yazıyoruz ve kodu çalıştırıyoruz. (Resim 7)
Sub json()
Dim MyWorkbook As Workbook
Dim MyDataWorksheet As Worksheet
Set MyWorkbook = Workbooks(ActiveWorkbook.Name)
Set MyDataWorksheet = MyWorkbook.Sheets("Sayfa1")
Dim OutputFile As String
Dim CellValue As String
Dim CurrentRow As Long
Dim CurrentCol As Long
Dim CurrentCharacter As Long
Dim LastRow As Long
Dim MyString As String
LastRow = MyDataWorksheet.Cells(Rows.Count, "a").End(xlUp).Row
For CurrentRow = 1 To LastRow
OutputFile = "C:\xampp\htdocs\data_tag\tagged_json\" & MyDataWorksheet.Cells(CurrentRow, 2) & ".json"
Open OutputFile For Output As #1
CellValue = MyDataWorksheet.Cells(CurrentRow, 7).Value
Print #1, CellValue
Close #1
Next CurrentRow
MsgBox "Done"
End Sub
VBA kodu 3-4 saniye içerisinde çalışmasını bitirecek ve “Done” mesajı verecektir. Artık elimizde 20.404 adet yapılandırılmış veri bulunmaktadır (JSON dosyası) (Resim 8)
Aşağıda oluşturulan JSON dosyasının içeriği verilmiştir.
{"description": "2*****13", "tags": [], "objects": [], "size": {"width": 100, "height": 26}, "name": "2*****13"}