Are you familiar with R programming language?
If so, you can use the below code to unstack the layers
library(terra)
# 1. Define directories
input_file <- "E:/data/bioclim/future_bioclim.tif"
output_dir <- "E:/data/output/"
# Create output folder if it doesn't exist
if (!dir.exists(output_dir)) {
dir.create(output_dir, recursive = TRUE)
}
# 2. Load stacked raster
r <- rast(input_file)
# 3. Assign layer names
names(r) <- paste0("BIO", 1:nlyr(r))
# Check names
print(names(r))
# 4. Unstack and save layers
for (i in 1:nlyr(r)) {
writeRaster(
r[[i]],
filename = paste0(output_dir, names(r)[i], ".tif"),
overwrite = TRUE
)
}