import tkinter as tk
from tkinter import ttk
import xlwings as xw
import os
direktori = os.getcwd()
file_arsip = direktori+"\\arsip\\ArsipTransaksi.xlsm"
arsip_stok = direktori+"\\arsip\\Arsip-Stok-Opname.xlsm"
window_nya = tk.Tk()
wb_nya = xw.Book("Apotek-V.M4.xlsm")
window_nya.title ("ARSIP DATA APOTEK-V.M4")
window_nya.geometry("500x400+250+50")
lab= tk.Label(window_nya, text ="ARSIP DATA", fg ='black', font =('Arial, 16'))
lab.place(x=265, y=20)
tx1= tk.Entry(window_nya, bd=5, fg= 'black',)
tx1.place(x=85, y=110, width=250)
tx1.delete(0, tk.END)
tx1.insert(tk.END,file_arsip)
lab1= tk.Label(window_nya, text="Direktori", fg= 'black')
lab1.place(x=30, y=110)
data= ("Transaksi", "Barang Masuk", "Data Adjustment")
cb=ttk.Combobox(window_nya, value=data)
cb.place(x=85, y=175)
lab= tk.Label(window_nya, text= "Pilih Proses! Arsip Data:", fg= 'grey')
lab.place(x=85, y=150)
def on_select(event):
mychoice = cb.get()
if mychoice == "Transaksi" :
wb_nya = xw.Book("Apotek-V.M4.xlsm")
wb_nya.activate
pilih_sheet = wb_nya.macro("Module1.Data_Transaksi")
pilih_sheet()
pindah_tran = wb_nya.macro("Sheet3.PindahDataBtn_Click")
pindah_tran()
elif mychoice == "Barang Masuk" :
wb_nya = xw.Book("Apotek-V.M4.xlsm")
wb_nya.activate
pilih_sheet = wb_nya.macro("Module1.Data_BarangMasuk")
pilih_sheet()
pindah_tran = wb_nya.macro("Sheet6.MoveBrgBtn_Click")
pindah_tran()
elif mychoice == "Data Adjustment" :
wb_nya = xw.Book("Apotek-V.M4.xlsm")
wb_nya.activate
pilih_sheet = wb_nya.macro("Module1.Data_Adjustment")
pilih_sheet()
pindah_tran = wb_nya.macro("Sheet9.RekapOpnameBtn_Click")
pindah_tran()
cb.bind("<>", on_select)
def pindah_data():
mychoice = cb.get()
if mychoice == "Transaksi":
# arsipkan transaksi dari python
wb2_nya= xw.Book(file_arsip)
arsip = wb2_nya.macro("Sheet3.PasteBtn_Click")
arsip()
wb2_nya.save()
wb_nya.activate
dihapus = wb_nya.macro("Sheet3.ClearBtn_Click")
dihapus()
#wb_nya.save()
elif mychoice == "Barang Masuk":
wb2_nya= xw.Book(file_arsip)
arsip = wb2_nya.macro("Sheet6.Paste2Btn_Click")
arsip()
wb2_nya.save()
wb_nya.activate
dihapus = wb_nya.macro("Sheet6.Clear2Btn_Click")
dihapus()
elif mychoice == "Data Adjustment":
wb3_nya= xw.Book(arsip_stok)
butt= tk.Button(window_nya, text="Pindahkan Data", command=pindah_data , fg ='black' , font =('Arial'))
butt.place(x = 235, y = 170)
window_nya.mainloop()
|
