Sunday, November 13, 2016

Recort by Macro

Kelompok : 1
Anggota : 1. Ipuk Ratnasari       (21)
                 2. Silvia Cindi F        (34)
                 3. Situtik Wulandari  (35)
                 4. Tiara Nurma Sari   (36)

Kelas     : X TKJ 2
Mapel    : Program Dasar







Sub Macro1()
For i = 1 to 15
    Range("F1").Select
End Sub
Sub Macro2()

Simple Racing



KELOMPOK : 25 , 26 , 31
ANGGOTA    : 1. MAULANA AULIYA R.
                           2. MUHAMAD ARIF
                           3. NUGRAHA DIMAS A.
KELAS           : X TKJ 2
TAHUN AJARAN 2016/2017



 


INTERMEZZO

Sub Button2_Click()
Range("B9").Select
ActiveCell.Interior.ColorIndex = 3

Shift Cursor and Color Index

Kelompok  : 5

Anggota   : 1. Kurnia Rahmawati

                   2. M. Falihul Isbah

                   3. M. Yusuf Faisal

                  4. Rino Cahyo Putra S

                  5. Zahro Saleh Artasya

Kelas        :  X TKJ 2

Tahun Ajaran 2016/2017

===== Kiri Atas Kanan Warna ===========
Sub NoSymbol2_Click()

Saturday, November 12, 2016

ListBox

Kelompok:
1.  Alex Nurdiyanto
2. Digky nuur faizin
3. Immanuel sindu kristian P.
4. Johan fahrul ilham

judul : CARA MEMBUAT DATABASE
Kelas : X TKJ 3

Sub Button5_Click()
Range("M4:Q4").Insert
Range("M4") = Range("G3")
Range("n4") = Range("G5")
Range("o4") = Range("G7")
Range("p4") = Range("G9")
Range("q4") = Range("n4") & "" & Range("o4") & "" & Range("P4")
End Sub

ColorIndex

Nama Kelompok
1. Alna Anggi s
2. Amelia f.H
3. Fadhila n.u
4. Istichomah
Kelas : X TKJ 3
Tahun ajaran 2016/2017







Sub UTurnArrow2_Click()

Friday, November 11, 2016

Penerapan Macro

PENERAPAN MACRO

Nama Kelompok :

1. Nadita Eka Apriza
2. Nevinta Budi P.
3. Oktaviana Dewi S.
4. Uswatun Hasanah




Sub Macro1()

Sunday, November 6, 2016

Shift Cursor And Indeks

Nama Kelompok :

      1. ARI PRASETYO (06)
      2.AHMAD SYAFIQ (01)
      3.ANDRYAN ANGGA D (03)
      4.ALUH AJI SAPUTRO (02)
      5.BINTANG CAHYA P (09)




If ActiveCell.Column > 1 And ActiveCell.Row > 1 Then

Saturday, November 5, 2016

Simple Racing

Nama kelompok : 4
Nama Anggota :
327 . Niya Pebrianti
 334. Shindy Setyowati
335 . Siti Romlah
339 . Yhuliani





Shift Cursor And Colorindex

KELOMPOK 2
KELAS : X TKJ 3 2016/2017
ANGGOTA :
323. MUHAMMAD NURUL ASLAM
332. REZA ARIS PRATAMA
333. SAMSUL HADITYA IBRAHIM




If ActiveCell.Column > 1 And ActiveCell.Row > 1 Then

Listbox Dan Combobox

Klompok : 4
Kelas       : X TKJ 3
Nama Anggota :
1.Najma Zahra Faradisa   (25)
2.Putri Ayu Lestari           (30)
3.Tarisa Muji Lestari        (36)
4.Wahyu Latifur Rohman (38)




Friday, November 4, 2016

Simple Racing

NAMA KELOMPOK : KREASI TANPA BATAS
ANGGOTA :
1. AHMAD DEDI KESWANTO           (01)
2. DEDDY NUR FAISAL AL GHOZI (07)      
3. HERI SETIAWAN                             (14)
4. MOCH SINGGIH PRAKOSO          (18)

Listbox by Group 1, 10 TKJ 3 (Absen Besar)

Anggota :
1. Muhammad Khoirur Rizqi (22)
2. Muhammad Alfian FP (21)
3. Nur Lita Sari (28)
4. Putri Handayani
 " Vidio Pengaplikasian Listbox"